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IDENTIFICATION 


PRODUCT CODE: AC-8572C-MC 

PRODUCT NAME: CZDPACO DP11 SYNC INTFC 
DATE: JAN,1979 

MAINTAINER: DIAGNOSTIC GROUP 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
+ Ret 8 peal FOR ANY ERRORS THAT MAY APPEAR IN THIS 

N . 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A 
LICENSE AND MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH 
THE TERMS OF SUCH LICENSE. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 


COPYRIGHT 1973,1976,1979 BY DIGITAL EQUIPMENT CORPORATION 
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59 PAGE 02 
60 
2 1. ABSTRACT 
63 THIS MAINDEC CONSISTS OF TWO PROGRAMS. FIRSTLY, A DP11A EXERCISER 
64 WHICH IS RUN WITH A TEST CONNECTOR (DB25S) IN PLACE OF THE MODEM. 
65 THE FUNCTION OF THIS TEST iS TO CHECK OUT THE CABLE (BCO1R-25) AND 
66 FUNCTIONAL INTERFACE WITH THE MODEM. THIS TEST IS RUN UNDER A 
74 SIMULATED (SOFTWARE) CLOCK THAT RUNS AT APPROXIMATELY 54KHZ. 
69 , SECONDLY, THERE IS THE PRINCIPLE DIAGNOSTIC FOR THE DP11. THIS 
70 PROGRAM RUNS IN THE MAINTENANCE MODE WITH THE BCO1R-25 CABLE 
71 REMOVED FROM THE SYSTEM UNIT. THIS TEST PROVIDES COMPLETE 
Cs DIAGNOSTICS FOR THE 5P11=DA AND DP11-CA. 
oe 2. REQUIREMENTS 
x 2.1 EQUIPMENT 
78 ANY PDP11 FAMILY CPU 
a4 ns Fl CONNECTOR (IF CABLE TEST IS TO BE RUN) 
S} DP11=CA (OPTIONAL) 
7 2.2 STORAGE 
4 THIS PROGRAM USES MEMORY TO LOCATION 17500 
4 Pu LOADING PROCEDURE 
89 THE PROGRAM MAY BE LOADED LIKE ANY OTHER PROGRAM 
90 SUCH AS: PAPER TAPE ,DECTAPE ,MAGTAPE ,CASSETT ,DISK,ETC. 
91 MOST COMMON WILL BE PAPER TAPE LOADING THROUGH 
THE USE OF ABSOLUTE LOADER. 
= 3.1 DF11-L TESTING 
96 THIS PROGRAM WILL EXERCISE THE DF11-L. 
97 METHOD: CABLE MUST BE INSERTED INTO DP11,TEST CONNECTOR ON END OF 
98 CABLE, SA=210, SET SWOO=1,HIT START AND CONT. AS PER 4.3.1. 
R NOTE: IN THIS TEST AN ERROR WILL CAUSE PRG TO START AT BEGGINING OF TEST 
101 
102 PAGE 03 
103 
4 4. STARTING PROCEDURE 
H+ 4.1 CONTROL SWITCH SETTINGS 
108 SWITCH 7 SET INDICATES SINGLE DP11 MODE 
44 CLEAR INDICATES CYCLE MODE (MORE THAN ONE) 
44K SWITCH 8 SET SELECTS THE DP11-CA OPTION FOR TEST 
113 4.2 STARTING ADDRESSES 
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200 START ADDRESS FOR MAINTENANCE MODE DIAGNOSTICS (CABLE 
MUST BE PULLED FROM THE SYSTEM UNIT) 


210 START ADDRESS FOR A odantinas CABLE TEST (DB25S TEST CONNECTOR 
MUST BE PLUGED IN 


OPERATOR ACTION 


IF SWITCH 7 WAS LEFT UP THE PROGRAM WILL HALT WITH THE SWITCH REG IN 
IN THE DATA LIGHTS. (EXCLUDING 11/05 AND 11/10 CPU) 
AND REQUIRE THE FOLLOWING OFERATOR ACTION: 


A) Sw0-Sw8 MUST BE SET TO THE VECTOR ADDRESS OF THE FIRST 
DP11. NOTE FIRST DP11 VECTOR; NOT THE LINE SELECTED 
UNLESS IT IS LINE 0 


B) Sw9-SW15 MUST BE SET TO THE OCTAL LINE NUMBER OF THE DP11 
TO BE TESTED. E.G. THE FIRST OP11 IS LINE 90. 


we ® CONTINUE, SR IS_IN DATA LIGHTS(EXCLUDING 11/05,11/10) At. 4 SWITCH 
AS PER 5.1.1''SWITCH SETTINGS''. PRESS CONTINUE. THIS STARTS PROGRAM. 
ALL DP11 ADDRESSES SHALL BE ASSIGNED FROM 774777 TC 774400 (CONTIGUOUSLY 
I.E. 1ST DP11 774776 XMIT 
774774 ~=XMIT 
SYNC 
CV E 
774770 RCV STATUS 
774766 
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774760 


774406 
774404 
774402 
774400 
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OR CABLE TEST REMOVE BCO1R=25 CABLE FROM MODEM AND PLUG THE 
DBoSS TEST CONNECTOR SOCKET INTO THE CABLE. 


FOR THE MAINTENANCE MODE TEST THE CABLE MUST BE REMOVED FROM 
THE DEVICE SYSTEM UNIT. 


OPERATING PROCEDURE 

SWITCH SETTINGS (APPLICABLE TO BOTH TESTS) 

SW15 = 1 OR UP ... HALT ON ERROR 

SW14 = 1 OR UP ... SCOPE LOOP FOR WHOLE CURRENT TEST 

SW13 = 1 OR UP ... INHIBIT ERROR PRINTOUT 

SW12 = 1 OR UP ... INHIBIT ALL PRINTOUT, BELL ON ERROR. 

SWi1 = 1 OR UP ... INHIBIT ITERATION 

SW10 = 1 OR UP ... ESCAPE TO NEXT TEST ON ERROR 

SWwO8 = 1 OR UP ... GO TO TOP OF CURRENT TEST ON ERROR. 
NOTE: THIS SWITCH IS VERY IMPORTANT FOR DATA 
ERRORS IN WHICH THE DP11 CLOCK IS RUNNING. 


THIS SWITCH MUST BE SET TO A 1 TO STOP 
AN AVALANCH OF ERRORS...... 


ERRORS 

ERROR PRINTOUT 

PRINTS ALL ERRORS UNLESS INHIBITED BY SWITCH 13 OR SWITCH 12. 
ERROR PRINT OUT WILL LOOK LiKE: 


TEST a XXX LINE NO. XX 
PC: XXXXXX 


DEPENDING ON THE ERROR AN ADDITIONAL MESSAGE MAY BE TYPED OUT. 


AS STATED ABOVE FOR ERRORS THAT ARE CAUSED BY , COMPAR I SON 
SUCH AS DATA COMPARISON,REGISTER COMPARISON,ETC 

AND _INTERUPT ERRORS, THERE WILL BE ADDITIONAL INFORMATION 
IN THE ERROR REPORT. 


SEQ 0004 
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PAGE 05 
ERROR RECOVERY 
A. IF IN A SCOPE LOOP, SET SWITCH 14. 


8. TO RECOVER FROM HALT ON ERROR, MAKE SURE SW14 IS SET THEN 
DEPRESS CONTINUE. 


C. IT MAY BE DESIRABLE TO SET St’ i3 OR SW 12 IN AN ERROR CONDITION. 
RESTRICTIONS 

STARTING RESTRICTIONS 

SEE 4.1 AND 4.3.1 

OPERATING RESTRICTIONS 


CABLE TEST (SA=210) MUST BE RUN WITH DB25S CONNECTOR IN PLACE 
OF A MODEM. 


MAINTENANCE nat DIAGNOSTIC MUST BE RUN WITH CABLE REMOVED 
FROM SYSTEM UNIT 


CYCLE MODE. IF SW 07=0 WHEN START IS PRESSED; PROGRAM 

WILL RUN SELECTED TEST (CABLE OR MAINTENANCE) ASSUMING 

THAT ALL DP11S IN THE SYSTEM ARE TO BE TESTED. PROGRAM 

STARTS WITH LINE 0 THEN SENSES FOR NEXT LINE; IF IT EXIS 

IT WILL BE TESTED. THIS GOES ON UNTILL A NON-EXISTANT Line IS FOUND 
THEN THE PROGRAM STARTS WITH LINE O AGAIN. 

BASCSR AND BASVEC ARE DEFAULT VALUES. IF YOUR VALUES ARE 

DIFFERENT PATCH YOUR VALUES IN THERE. 


MISCELLANEOUS 
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PROGRAM DESCRIPTION 
INITIALIZATION ROUTINES 


THE START CODE FOR BOTH THE MAINTENANCE MODE AND THE CABLE 
TEST INITIALIZES THE PROCESSOR PRIORITY TO LEVEL SEVEN AND 
SETS THE STACK POINTER TO ADDRESS 1100. tag Rw A SEVEN 


IF SWITCH SEVEN IS 
UP TWO SUBROUTINES (CLRVEC,LINE.N) ARE EXECUTED BEFORE THE 
TEST SECTION IS ENTERED. 


CLRVEC, CLEAR-VECTOR-AREA 


THE SUBROUTINE ‘‘CLEAR-VECTOR-AREA’’ LOADS THE COMMUNICATION 
VECTOR AREA WITH .+2,HALT. THIS CAUSES ANY ILLEGAL INTERRUPTS 
TO TRAP TO THERE STATUS WORD. 


LINE.N, LINE NUMBER 


THE FUNCTION OF THIS SUBROUTINE IS TO SAVE SWITCH EIGHT OF 
THE CONSOL (SW8 SELECTS DP11-CA OPTION) AND WAIT FOR OP- 
ERATOR ACTION TO SPECIFY THE LINE NUMBER AND FIRST DP11 
VECTOR ADDRESS. WHEN THE PROGRAM HALTS; 

SWITCHES SWO THRU SW8 MUST BE SET TO THE VECTOR 

ADDRESS OF THE FIRST DP11 AND SWITCHES SW9 THRU ad ae 
BE SET TO THE OCTAL EQUIVILANT OF THE LINE (E.G 

THE FIRST LINE IS LINE 0(8) THE TENTH LINE IS CINE Ma) ). 
FOLLOWING THIS ACTION ‘‘CONTINUE’’ ENTERS THE PROGRAM INTO 
THE SELECTED TEST SECTION. IF SWITCH SEVEN IS NOT UP WHEN 
""START’’ IS DEPRESSED THE PROGRAM ASSUMES CYCLE MODE 

AND WILL START RUNNING WITH LINE 0 THRU ALL LINES. 

BASCSR AND BASVEC ARE USED AS DEFALT CONDITIONS. 


MAINTENANCE MODE TESTS 
IN AN EFFORT TO OPTIMIZE CORE UTILIZATION MANY OF THE 


DIAGONOSTIC TEST WERE WRITTEN IN SUBROUTINE FORMAT 
VERSUS MACROS. 
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9.2.1 BITST, BIT TEST 


THIS SUBROUTINE IS ENTERED WITH A JSR RS, BITST. IM- 

MEDIATELY FOLLOWING THIS INSTRUCTION IS THE BIT ave 

FOR TEST. THE BIT NUMBER IS FETCHED ¥ THE SUBROUTI 

AND STORED IN LOCATION ‘BITS'*. USING A SEQUENCE OF SBIS"’ *BIT’’ 
"BIC'' INSTRUCTIONS EACH READ/WRITE BIT OF THE TRANSMITTER 

AND RECEIVER CSR (TCSR,RCSR) IS TESTED TO VERIFY THAT AT LEAST 

THAT PARTICULAR BIT CAN BE REFERENCED AND IS IN FACT READ/WRITE. 

SS TERACT ime.” MADE AT THIS POINT TO CHECK FOR ILLEGITIMATE 


RESET TEST 


THIS IS A SIMPLE TEST THAT MERELY WRITES INTO ALL WRITEABLE 
BITS OF THE TCSR AND RCSR, CHECKS THAT THEY WERE SET 

ISSUES ‘RESET’ AND CHECKS THAT ALL BITS THAT ARE SUPPOSED TO 
BE CLEARED BY RESET-WERE. 


VALID 


THE FUNCTION OF THIS SUBROUTINE IS TO TEST FOR INTERACTION 
BETWEEN READ/WRITE BITS OF THE TCSR AND RCSR. THIS ROUTINE 
IS ENTERED WITH A JSR REGISTER FIVE, FOLLOWED BY THE BIT 
NUMBER. THE SELECTED BIT IS SET AND THEN THE ENTIRE CSR 

IS_ COMPARED WITH THE WORD (BITS) USED TO SET THE SELECTED 
BIT. IF ANY OTHER BIT IS SET AN ERROR IS REPORTED. LOCATION 
“REG’’ CONTAINS THE ADDRESS OF THE CSR SELECTED FOR TEST. 

AN EXAMINATION OF THIS CSR SHOULD REVEAL A BIT SET OTHER 
THAN THE ONE IN LOCATION ‘BITS''. 


CLEAR 


THIS SUBROUTINE IS ENTERED THE SAME WAY AS BITST, AND VALID 
ARE ENTERED. ITS FUNCTION IS TO TEST FOR INTERACTION 
BETWEEN ANY CSR BITS DURING A BIT CLEAR INSTRUCTION. 

THIS IS ACCOMPLISHED BY SETTING ALL READ/WRITE BITS 

OF THE SELECTED CSR AND MAKING A DUPLICATE BIT MAP IN 
TMPDAT. THEN 'BITS‘' IS USED TO CLEAR A SINGLE BIT IN THE 
CSR AND TMPDAT. FOLLOWING THIS THE CSR IS COMPARED WITH 
TMPDAT TC VERIFY THAT ONLY THAT BIT WAS CLEARED. 


PRIORITY TESTS 


WITH THE PROCESSOR PRIORITY AT LEVEL FIVE *‘STATUS-INTERRUPT=- 
ENABLE*’ (SIE) IS SET AND ALL THE BITS THAT SHOULD CAUSE 4 
STATUS INTERRUPT ARE SET INDIVIDUALLY AND COLLECTIVELY SET. 
ey SIE IS REMOVED AND THE PROCESSOR PRIORITY IS LOWERED 
TO F AGAIN THE CSR BITS THAT CAUSE ‘‘STATUS INTERRUPTS** 
ARE SET AND RESET. FINALLY THE SIE BIT IS SET WHILE THE 
PROCESSOR PRIORITY IS AT FOUR AND IT IS VERIFIED THAT 

EACH DISCRETE EVENT THAT SHOULD CAUSE A STATUS INTERRUPT 

DOES. THIS SEQUENCE TESTS THAT — DP11 STATUS BITS INTERRUPT 
AT THE PROPER PROCESSOR PRIORITY. THE NEXT SEQUENCE OF PRIORITY 
TESTS VERIFY THE TRANSMITTER INTERRUPTS BY LOADING THE 
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334 TRANSMIT BUFFER, ENABLING THE MAINTENANCE MODE CLOCK AND 
HH WAITING FOR AN INTERRUPT. IF NO INTERRUPT IS RECEIVED WITHIN 


10 CHARACTER TIMES AN ERROR IS REPORTED. 
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9.2.6 


SYNCHRONIZATION TESTS 


THE FIRST SYNC TEST (TEST 24) VERIFIES THE READ/WRITE CAPABILITY 
OF THE SYNC REGISTER 174XX3 AND THE SYNC EXTENSION is ~¥ 

WHEN THE DP11=CA OPTION EXISTS. THIS IS oh a ED 

WRITING AND READING ALL POSSISLE SYNC CHARACTERS (0 THRU 377(8) 
FOR THE SYNC REG AND 0 THRU 17(8) FOR THE SYNC EXTENSION ° 


THE NEXT SYNC _TEST ISSUES TWO OF EVERY Sar ten TE SYNC 
CHARACTER IN EACH OF THE AVAILABLE C CTER LENGTH 

CHECKS THAT TWO OF EACH SYNC RAISES. ORECE IVER ACTIVES 

THE THIRD SYNC IS TRANSMITTED AS DATA. THIS S_ THE 
ABILITY OF THE RECEIVER TO INTERRUPT AND ALSO CHECKS THE 
RECEIVER BUFFER FOR DATA RECEPTION ACCURACY. ST 

IS FIRST RUN BY LOADING THE TRANSMIT BUFFER UNDER SOF TWARE 
CONTROL THEN IS REPEATED IN THE IDLE MODE. THIS CHECKS THAT 


LAST TWO SYNC TEST AND * I 

SCOPE LOOP MAY BE RUN. THIS IS ACCOMPL I SHED BY REMOVING 
“'HALT~ON~ERROR’’ SW15, SETTING ‘'SCOPE’', INHIBIT PRINT,SET SWO9, AND 
PRESSING CONTINUE. THIS CAUSES INCREMENT INSTRUCTION TO BE 
SKIPPED AND THEREFORE LOOP ON THE SAME SYNC CHARACTER. 


INTERRUPT DRIVEN SEQUENTIAL DATA TEST 
SYNC IS ESTABLISHED THROUGH THE TRANSMISSION TWO SYNC CHARACTERS. 


ONCE SYNC IS ESTABLISHED A BINARY COUNT PATTERN IS TRANSMITTED 
THE SIZE OF WHICH IS DETERMINED BY THE MAXIMUM CHARACTER SELECTED 
FOR TEST (8 BITS/CHARACTER OR 12/8 BITS/CHARACTER IF THE CA 
OPTION EXISTS). AT THE COMPLETION OF THE BINARY COUNT PATTERN 
“ACTIVE'’ IS DROPPED AND THE NEXT SHORTEST CHARACTER LENGTH IS 
thee mb? es. IS REPEATED FOR THREE CHARACTER LENGTHES 


FUNCTIONALLY THIS TEST VERIFIES THE CAPABLIITY OF THE DP11 TO 
MAINTAIN SYNC OVER A LONG CHARACTER STRING. 


IN THE EVENT THAT AN ERROR IS gy hae 5 AND *'HALT-ON-ERROR** IS UP 
REMOVE IT, SET ‘‘INHIBIT PRINT’ "“SCOPE'’ AND PRESS CONTINUE. 
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9.2.8 | RANDOM DATA, RANDOM STALL 


THIS INTERRUPT DRIVEN TEST TRANSMITS RANDOM DATA FOR A PERIOD 

OF TIME (0 TO 0.65 SECONDS, 0 TO 260 CHARACTERS) DETERMINED BY 
DOM GENERA wie THE EXPIRATION OF THE DATA TIME INTERVAL 

NTERED AND SYNC_CHARACTERS ARE TRANSMITTED 

FOR A RANDOM PERIOD OF TIME. WHEN THE IDLE TIME TERMINATES 

Tie INTER IS RESTARTED AND NEW DATA IS TRANSMITTED FOR A NEW 

THIS VERIFIES THAT THE DP11 CAN SWITCH BETWEEN DATA MODE AND 

IDLE AT RANDOM. 


PARITY TEST 


THE PARITY TEST CONSISTS OF A TRANSMITTER INTERRUPT SERVICE 
ROUTINE THAT TRANSMITS A BINARY COUNT PATTERN AND A RECEIVER 
INTERRUPT SERVICE ROUTINE THAT CALCULATES THE PARITY ON THE 
EXPECTED DATA, COMPARES THE RECEIVED DATA WITii THE EXPECTED DATA, 
AND FINALLY TESTS THE PARITY BIT (BIT 12=0 FOR EVEN, 1 FOR ODD). 


9.2.10 RECEIVER OVERRUN TEST 


THIS TEST TRANSMITS TWO SYNC CHARACTERS 10 RAISE ‘‘ACTIVE"’ 
FOLLOWED BY TWO DATA CHARACTERS. RECEIVER INTERRUPT a IS 
NOT SET THEREFORE ‘RECEIVER OVERRUN’ SHOULD SET AND CAUSE A 
TRANSMITTER STATUS INTERRUPT. THIS SEQUENCE IS REPEATED FOR A 
FULL BINARY COUNT. (000-377) 


HALF DUPLEX TEST 


THE HALF DUPLEX BIT SHOULD Pa yey ANY DATA FROM ENTERING THE 
RECEIVER WHILE SEND-REQUEST TO VERIFY THIS RECEIVER 
INTERRUPT ENABLE 

MATELY 30MS. SIBLE C 

BIT/CHAR SET. ANY DATA ENTRY INTO THE RECEIVER WILL CAUSE & 
TRAP TO AN ERROR ROUTINE. 


CABLE TEST 


THE CABLE TEST REQUIRES THE LEAST AMOUNT OF EFFORT AND THEREFORE 
BE RUN AS A QUICK CONFIDENCE ag en RATING 


EM 

FROM THIS POINT ON 
IS THE SAME AS THE MAINTENANCE 

THE PRINCIPLE DIFFERENCE BETWEEN THE 

CABLE TEST AND THE MAINTENANCE MODE TEST IS THE CLOCK. 

MAINTENANCE MODE TEST RUNS OFF OF A FREE RUNNING 3KHZ MULTI- 

VIBRATOR WHERE AS THE CABLE TEST OPERATES OFF A SOFTWARE CLOCK. 

SETTING BIT 3 OF THE TRANSMITTER STATUS RAISES THE CLOCK, CLEARING 

IT LOWERS THE CLOCK. THE SOF TWARE or THEREFORE HAS A FREQUENCY 

RANGE OF ZERO TO 56KHZ. THIS ENABLES THE PROGRAM re STEP 

THROUGH THE TRANSMIT-RECEIVE SEQUENCE ONE BIT AT A TIME. 

IT ALSO VERIFIES THE 10KHZ CABLE SPEC AND 50 KHZ LOGIC SPEC. 
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9.3.2 CLOCK 


CLOCK IS THE SUBROUTINE TO RUN THE oat CLOCK. IT IS 
SeSIntD BY A_TRAP cts CLOCK FOLLOWED BY THE 


4 IS ADDED TO THE CLOCK COUNT AND 
BIT 10 OF THE RECEIVER STATUS IS SET BEFORE EXECUTING THE 
CLOCKING INSTRUCTIONS. BY CHANGING LOCATION ‘*FREQ’' 
IT IS POSSIBLE TO SLOW DOWN THE CLOCK. WITH 
FREQ 1 THE SOFTWARE CLOCK RUNS AT APPROXIMATELY 25 a THIS 
ENABLES THE OPERATOR TO SLOW THE CLOCK DOWN TO ALMO 
ZERO CPS. THIS CAN BE USEFULL IN DETERMING IF A BUG IF 
FREQUENCY DEPENDENT. 


RXCLK 


THIS TRAP CALL IS ANOTHER SOFTWARE CLOCK. IT WAS WRITTEN 
FOR CODE THAT IS INDEPENDENT OF 12/8 BITS PER CHARACTER 
OPTION. RXCLK N EXECUTES N SOFRWARF CYCLES. RXCLK ALSO HAS 
“FREQ’’ EMBEDDED WITHIN ITS DEFINITION. SINCE 

IT IS A TRAP CALL THE DELAY feo tee CAN BE CHANGED 

BY CHANGING THE CONTENTS OF ‘FREQ’ 


REE 


REE IS A UTILITY SUBROUTINE TO REINITIALIZE THE DP11 STATUS 
REGISTER, INTERRUPT VECTOR AND SELECT THE 12/8 3ITS PER CHARACTER 
MODE. THE ENTRY eoyw IS_R5. THE ADDRESS TO WHICH THIS 
SUBROUTINE RETURNS IS A FUNCTION OF THE NUMBER OF BITS PER 
CHARACTER SELECTED FOR TEST. IF 8 BITS PER CHARACTER IS a + > Ae 
RETURNS TO AN INS THE D 


T IF THE TWELVE BIT PER CHARACTER MODE TS. 
O_THE CONTENTS OF REGISTER 5 IS MODIFIED AND SUBROUTINE 
RETURNS TO THE INSTRUCTION THAT SETS UP THF TWELVE BIT LIMIT. 


SYNCHRONIZATION CHARACTER TESTS 


FOLLOWING STATUS REGISTER AND VECTOR INITIALIZATION THE CLOCK IS 
RUN FOR 30 eT TO CLEAR OUT ANY PREVIOUS DATA THAT MAY BE 


SMITTER ‘TRAN ENABLE’ 
CAUSING AN TRANSIT TOA SYNCHRONIZATION Se ry. 


LOADS THE T 
THE CLOCK K, RUNS FOR 3 
FICIENT TO RAISE ‘'SEND REQUEST’’: IF NOT AN 
THE SOFTWARE CLOCK THEN GENERATOR ENOUGH 
T EXACTLY ONE CHARACTER AND EXAMINES "RECEIVE 

IF RECEIVER ACTIVE I$ UP THE RECEIVER: 1 PREMATURELY 
ACTIVE AND AN ERROR IS REPORTED. THE NEXT SET OF CYCLES GENERATED 

15 ONE SHORT OF THE NUMBER REQUIRED TO TRANSMIT A FULL CHARACTER. 
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RANDOM DATA, RANDOM IDLE 


THIS TEST IS SIMILAR TO THE RANDOM DATA TEST “7 IN THE MAIN- 
TENANCE MODE. THE DIFFERENCE IS THAT IN GOING FROM ‘‘IDLE’’ TO 
“DATA'’, ‘ACTIVE’ IS DROPPED AND THE RECEIVER RESYNCED. 


SEND-REQUEST TEST 


IN THIS TEST ‘'SEND REQUES7** IS RAISED BY LOADING THE TRANSMIT 
BUFFER AND GENERATING 3 CYCLES. IF _ THE CABLE IS WIRED PROPERLY 
"SEND REQUEST’ SHOULD RAISE ‘‘CLEAR-TO -SEND’’ AND ‘MODEM READY'' 
(DATA SET READY). THIS TEST IS REPEATED 1N THE 8, 7, AND 6 
BITS PER CHARACTER MODE. 


TERMINAL READY 


THE FUNCTION OF THIS TEST IS TO VERIFY THAT WITH THE DB25S_TEST 
CONNECTOR IN ane SETTING “TERMINAL READY’’ RAISES — 
AND "RING FLAG''. THIS TEST ALSO VERIFIES ‘RING FLAG’ 

“CARRIER DOWN FLAG’ INTERRUPT. 





CZDP MACY, 30A(1052), 30-JAN-79 15:40 PAGE 15 
CZDPAC.P11 .  30-JAN-79 15:40 SEQ 0013 


3;DP11A SYNCHRONOUS MODEM INTERFACE DIAGNOSTIC 
pxxkxkkeMAINTENANCE MODE**%«% 
;COPYRIGHT, DIGITAL EQUIPMENT CORPORAT ION* **%% 
imA YNARD , MASSACHUSETTS 01754 
PROGRAMMER : JOHN FRIEDRICH 
sREVISED BY: 
é REVISION B CREATED BY JOHN EGOL 
é REVISION C CREATED BY ELLIOT GERBER G 
; . ( ALL CODE COMMENTED ;+ IS FROM REV. (C) 


3Z2Z2-C72DPA-C 


37DP11 
; COPYRIGHT JUNE 1973,1979, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 
apoyo PROCEDURE 


LOAD ADDRESS 000200 

PRESS STAR 

:THIS IS FOR THE STATIC TEST 

SLOAD ADDRESS 000210 

+PRESS START 
:THIS IS FOR CABLE TEST 
OR INF TION 


FOR MORE ORMA SEE _THE 
;DOCUMENTATION IN FRONT OF THE LISTING 


SWITCH REGISTER OPTIONS 
SW15= 100000 -HALT ON ERROR 

LOOP ON CURRENT TEST 

- INHIBIT ERROR TYPEOUT 
-DELETE TYPEOUT/BELL ON ERROR. 
- INHIBIT_ ITERATIONS 

“ESCAPE TO NEXT TEST ON ERROR 
-LOOP pe I aca DATA 


-LOOP ON ERROR 
«SINGLE SELECTED DP11. =O CYCLE ALL DP11S 


nnnnnnnun 
hana aR 


BeBe Be Be Se Be Be Be Be 
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REGISTER DEFINITIONS 


GENERAL REGISTER 
;GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
PROCESSOR STACK POINTER 
PROGRAM COUNTER 


LOCATION EQUIVALENCIES 


177570 SWR=177570 CONSOLE SWITCH REGISTER 
177570 LIGHTS=177570 ;PDP-11/45 DISPLAY REGISTER 
177776 PS=177776 PROCESSOR STATUS WORD 
001050 STACK=1050 :START OF PROCESSOR STACK 


: INSTRUCTION DEFINITIONS 


005746 PUSH1 SP=5746 sDECREMENT PROCESSOR STACK 1 WORD 
005726 : INCREMENT ‘tie STACK 1 WORD 
010046 SAVE RO ON STACK 
012600 RESTORE RO PROM STACK 
024646 . :DECREMENT STACK TWICE 
022626 : INCREMENT STACK TWICE 

BASIC DEFINITION OF ERROR CALL 
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; TRAPCATCAER FOR ILLEGAL INTERRUPTS 
000002 +2 ; UNEXPECTED TRAP TO THIS LOCATION 
000000 AUSE 
000006 
000000 
000012 
000000 


ND CAUSE 
TED TRAP Y THIS LOCATION 
sé NE STACK TO FIND CAU 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
= UNEXPECTED TRAP TO THIS LOCATION 
;EXAMINE STACK TO FIND CAUSE 
[UNEXPECTED TRAP wy THIS LOCATION 
sEXAMINE STACK TO FIND CAUS 
; UNEXPECTED TRAP TO THIS LOCATION 
ND CAUSE 


EXAMINE STACK TO FIND CAUSE 
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000156 
000000 
000162 
000000 
000166 
000000 
0001 72 
000000 
000176 
000000 
000202 
000000 
000206 
000000 
000212 
000000 
000216 
000000 
000222 
000000 
000226 
000000 
000232 
000000 
000236 
000000 
000242 
000000 
000246 
000000 
000252 
000000 
000256 
000000 
000262 
000000 
000266 
000000 
000272 
000000 
000276 
000000 
000302 
000000 
000306 
000000 
000312 
000000 
000316 
000000 
000322 
000000 
000326 
000000 
000332 
000000 
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; UNEXPECTED TRAP TO THIS LOCATION 
; EXAM CK F 


ND CAUSE 
5 TRAP TO THIS LOCATION 
SEXAMINE STACK TO FIND CAUSE 
; UNEXPECTED TRAP TO ae laa 


CAU 

“UNEXPECTED TRAP TO THIS LOCATION 

EXAMINE STACK TO FIND CAUSE 

; UNEXPECTED TRAP TO THIS LOCATION 
ND CAUSE 


7 EXAM 

; UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
ZUNEXPECTED TRAP Ys THIS LOCATION 
; EXAMINE FIND CAUSE 


7 EXAMINE ST. FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
; UNEXPECTED TRAP TO as A le 


SEXAMINE STACK TC FIND CAUSE 


SEQ 0016 


ZDP 
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30-JAN-79 
000336 
000000 
000342 
000000 


Py AN-79 
5:40 


15:40 PAGE 19 


UNEXPECTED TRAP TO THIS LOCATION 
+ EXAMINE STACK TO FIND CAUSE 


7 EXAM AU 
[UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
[UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
[UNEXPECTED TRAP TO bay .OCAT ION 


SUNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED | =. " THIS LOCATION 
; EXAMINE F IND 


ND 
“UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 


SEQ 0017 


CZDP 


MACY11_30A(1052) 


CZDPAC.P11 30-JAN-79 


000514 000516 
000000 
000520 000522 
000524 000526 
000000 


30-JAN-79 
15:40 


15:40 PAGE 20 


= UNEXPECTED np TO THIS LOCATION 


= 
”n 
4 
oO 
n 


‘EXAMINE STACK TO FIND CAUSE 


SEQ 0018 


CZDP 


MACY11 


CZDPAC.P11 


POAC) ne 
30-JAN-79 15:40 


000676 
00000 


011646 
162716 000002 
017616 000000 


15:40 PAGE 21 


Ae UNEXPECTED TRAP TO THIS LOCATION 
HAL T SEXAMINE STACK TO FIND CAUSE 
+2 : TED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FIND CA 
o%é UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FIN 
+2 UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FI 
-+2 UNEXPECTED TRAP TO THIS LOCATION 
HALT ; INE STACK TO FI 
+2 UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FI 
o%é UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FIN 
o%€ UNEXPECTED TRAP TO THIS LOCATION 
HAIL.T EXAMINE STACK TO FI 
-+2 sUNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FIND CAU 
+2 3 TED TRAP TO THIS LOCATION 
HALT : INE STACK TO FIND CAU 
-+2 UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FI 
+2 = UNEXPECTED TRAP TO THIS LOCATION 
HALT INE STACK TO FI 
-+2 “ UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FI 
-+2 [UNEXPECTED TRAP TO THIS _ 
HALT SEXAMINE STACK TO FIND CAU 
+2 UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FI 
ote UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FIND CAUS 
-+2 UNEXPECTED TRAP TO THIS LOCATION 
HALT EXAMINE STACK TO FIND CAUSE 

so * hag INITIALIZATION 
-PFAIL sPOWER FAIL VECTOR 
340 sPRIORITY 7 
«HLT 
340 
. TRPSRV 
340 

46 
LOGICAL 
52 

=56 
TRAP DISPATCH SERVICE 
sARGUMENT OF TRAP IS EXTRACTED 
;AND USED AS OFFSET TO OBTAIN POINTER 
:TO SELECTED SUBROUTINE 

. TRPSR: MOV (SP) ,~(SP) GET PC OF RETURN 
SUB #2, (SP) :=PC OF TRAP 
MOV a(SP), (SP) GET TRP 


SEQ 0019 


CZDP MACY11 tes sees 15:40 PAGE 22 
CZDPAC.P11 30-JAN-79 15:40 SEQ 0020 


TRPOK : SP) sMULTIPLY TRAP ARG BY 2 
177001 B #177001, (SP) ;CLEAR UNWANTED BITS 
001202 #. TRPTAB, (SP) [POINTER TO SUBROUTINE ADDRESS 
000000 a(SP), (SP) ; SUBROUTINE ADDRESS 
@(SP)+ [GO TO SUBROUTINE 


001146 : : XL INEX 
001262 BEGIN1 :SET UP CONSOL SWITCH REGISTER 


001146 7 XL INEX 
007234 BEGIN2 :DB25S CONNECTOR TEST 


INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 


177560 : TELETYPE KEYBOARD CONTROL REGISTER 
177562 TELETYPE KEYBOARD DATA BUFFER 
177564 ;TELEPRINTER CONTROL REGISTER 
177566 :TELEPRINTER DATA BUFFER 


;PROGRAM CONTROL PARAMETERS 


SCOPE ADDRESS FOR LOOP ON TEST 

SADDRESS OF NEXT TEST TO BE EXECUTED 

sADDRESS FOR LOCK ON CURRENT DATA 

NUMBER OF ITERATIONS THAT CURRENT TEST WILL BE 
NUMBER OF ITEREATIONS COMPLETED 

NUMBER OF TEST IN PROGRESS 

NUMBER OF PASSES COMPLETED 

:TOTAL NUMBER OF ERRORS 

:PC OF LAST ERROR CALL 


0 
0 
0 
0 
0 
0 
0 
0 
0 


PROGRAM VARIABLES 
fi a a pd STORAGE 


3R5_ STORAGE 
STACK POINTER STORAGE 
PROGRAM COUNTER STORAGE 


S88888S8888883ssss 
2 oh SO 
St tt 9 9 9 3 3H SS se 
RNSSRYSRRVSSRNORRD 
wlelelelelelelslelelelelelelelsiole) 





CZDP MACY11_30A(10 
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SEQ 0021 
MLINEX: 


000000 
000000 
000000 


000000 
000000 
000000 


lelelelelelelelelelealela) 


000000 
000000 





CZDP 


CZDPAC.P11 


1008 


8 


— eS) = os oS os I 
SoCoooC°ooo 
el ed ek ed ed etd nd ed 
WOONAULRWN—O 


001202 
001202 
001204 
001206 
001210 
001212 
001214 
001216 
001220 
001222 
001224 
001226 
001230 


MACY11_30A(1052) 
30=JAN-79 


000000 


30-JAN-79 
15:40 


15:40 PAGE 24 


PROGRAM CONTROL FLAGS 


INIFLG: .BYTE 0 
STFLG: .BYTE QO 
ERRFLG: .BYTE 0 
LOKFLG: .BYTE 0 
$y=0 


; PROGRAM alt aac FLAG 
TEST START FLAG 

ERROR OCCURED FLAG 

;LOCK ON CURRENT TEST FLAG 


sDEFINITIONS FOR TRAP SUBROUTINE CALLS 
SPOINTERS TO SUBROUTINES CAN BE FOUND 
IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


FARE RARER EERE REE EEE ERE EKEEEEERKEREREO KEK 
—MmASAAAAASLALALARAASALAASALALASASALALA ALAS ELAR EASA A ARRAS AA SSS E SOS DD 


" TRPTAB: 

SCOPE=TRAP+0 CALL 
. SCOPE 

CLOCK=TRAPS 1 CALL 

RXCLK=TRAP+2 CALL 
-RXCLK 

DELAY=TRAP+3 CALL 
DELAY 

CLEAR=TRAP+4 CALL 

VAL ID=TRAP+5 CALL 
. VALID 

SCOP1=TRAP+6 CALL 

TYPE=TRAP+7 CALL 
. TYPE 

SAVO5=TRAP+10 CALL 

RESO5= =TRAP SII ZCALL 

CONVRT=TRAP+12 CALL 

ONVR 
CALL 


CNVRT= TRAB +15 
- CNVRT 


TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 


SCOPE LOOP AND ITERATION HANDLER 
CLOCK DEVICE 

CLOCK THE RX 

DELAY FOR SPEC. TIME. 

BIT CLEAR SPEC BIT 

MAKE SURE ONLY SPEC BIT CLR 

LOOP ON CURRENT DATA HANDLER 
TELETYPE OUTPUT ROUTINE 

REGISTER SAVE ROUTINE 

REGISTER RESTORE ROUTINE 

DATA OUTPUT ROUTINE 

DATA OUTPUT ROUNTINE WITHOUT CR/LF. 


FRA EKEEKEEEEEREKEKEEREEEEEREAEEEEREEEEEEREEEREEREEEERREEEREEKEERE 
FERRER AREER EEE EERE EKER EREREEEEEEEEEEEEEEEEEEEREREEEEEEEREEKKKEKE 


J ERE EERE REE EEE REE EEKKEEEKEREEREEEREERREEEEEREKEEREEEEEREERREREER KERR 


DPRS: -BLKW 1 
DPRB: BLKW 1 
SYNC: -BLKW 1 
DPTS -BLKW 1 
DPTB -BLKW 1 
SEXT: “BLKW 1 


:DP11 RECEIVER STATUS 
;DP11 RECEIVER BUFFER 
YNC BUFFER 


3DP11 TRANSMITTER STATUS 
7DP11 TRANSMITTER BUFFER 
;DP11 SYNC EXTENSION 


FERRARA AREER EERE EAE AEARAREEERE eRe 


SEQ 0022 


cZzD° MACY11 when 30-JAN=79 15:40 PAGE 25 
CZDPAC.P1i 30-JAN-79 15:40 


:DP11 RECEIVER Enitnite VECTOR 

:DP11 RECEIVER PRIORITY 

[DP11 TRANSMITTER INTERRUPT VECTOR 

;DP11 TRANSMITTER PRIORITY 
: 300 THIS _IS_ THE FIRST VECTOR. PATCH FOR YOUR FIRST 
: 174770 ;FIRST CSR ADDRESS.MAKE IT YOURS. 


FREER REE EERE EKER 


BEGIN1: RESET CLEAR THE WORLD. 
CLR CABLE SET FLAG FOR NO CABLE TEST. 
MOV a Meg B "al SET UP STACK POINTER 
MOV #340,P ;SET PROCESSOR PRIORITY = 7 
4a $ MTITLE :+TYPE TITLE OF PROGRAM 
177570 : TSTB SWR 71S SWITCH SEVEN SET?? 
BGNO 7BR_IF SW 07 NOT UP. 
gi Sole PC,CLRVEC 


SET UP COMM VECTOR AR 
2234 PC,LINE.N :GO GET THE go LINE "NO. AND VECTOR. 
PART1 :GO TO START THE TEST. 
012514 2 PC,CLRVEC ;SET UP COMM VECTORS 
PC ,LINE.X :60 AND AUTO CYCLE THROUGH DP11S 
— ;SHOULD I DO se Mae TEST OR MAINT. TEST?? 
+ 


000137 PART2 
012737 #TST1,RETURN SSET RETURN ADDRESS 


SeaseaeTEST 1: READ/WRITE ALL BITS OF STATUS##xesnses 


SKEKKKKKKKKKKK 


eet iii aiii ty 
DOA OISISIIUISII IOI ICICI IOI IOUT RRR RRR th htt htt 
012737 000001 001072 TST1: #1,TSTNO 
001062 #TST2,NEXT 
177776 #34C,PS SET PROCESSOR STATUS TO 7 
aDPTS :CLEAR TRANSMITTER STATUS 
@DPRS :CLEAR RECEIVER STATUS 
177634 #FTINT ,@DPTIV [SET UP TRANSMITTER TEST VECTOR 1 
:SET UP RECEIVER reer VECTOR 1 
SET UP RECEIVER PRIORITY=5 
7SET UP TRANSMITTER PRIORITY=5 
-@SYN :CLEAR NOISE FROM dy 
052777 000004 177556 #81T2,aDPRS 7SET MAINTENANCE MOD 
:TO ENABLE INTERNAL CLOCK (3KHZ) 
032777 177550 #B1T2,aDPRS MAINT. SET 
001001 +4 ; YES 


sYE 
REPORT ERROR 


104000 
104400 





CZDP MACY11 wees 


CZDPAC .P11 


1079 
1080 


a 


SSLRIZESSBSRSSSES 


kk hk dd dd dd ad td dh od gt ot td td 


lO Dl a a ad ed ah a a dd 9 dd dd dd md 
ot ad od ot ad 
RAN ASVSNRARAVLS SHUT ARAVISSRYFGRALLES 


30-JAN-79 


012737 
012737 


000 
aR fea 


012737 
012737 


005000 
013737 
004537 


000001 
042777 
004537 


O° aac 
5:40 


000002 
001576 


001232 
012542 


912542 
012542 
012542 
012542 
012542 
012542 
012542 


001072 
001062 


013110 


001672 
001062 


013110 


177374 


15:40 PAGE 26 


ZN ILLEGAL trh hy 4 WILL TRAP TO 


AN ERROR MESSAGE ROUTINE 
TEST ALL READ/WRITE BITS OF RECEIVER STATUS 


1ST2: MOV 
MO 


sBIT3=MISCELLANEOUS RECEIVE=READ ONLY 
BIT11=RECEIVE ACTIVE=READ/WRITE ZERO 
7B1T12=PARITY(VRC)=READ ONLY 
sALL OTHER BITS ARE NOT USED 


#2,TSTNO 
#T5T3,NEXT 
RO 


DPRS ,REG 
R5,BITST 


R5,BITST 
R5,BITST 
RS ,BITST 
R5,BITST 
R5.BITST 
R5,BITST 
R5 ,BITST 


TEST RECEIVER STATUS BITS 
SYNC STRIP 


HALF DUPLEX 

MAINTENANCE MODE 
sRECEIVER INTERRUPT ENABLE 
; DONE 

:BITS/CHAR 


e ee ee 
e 


TEST ALL READ/WRITE BITS OF TRANSMITTER STATUS 


SKERKKEKRKKKKK 


TEST 3 


TST3: MOV 


* 
sKKAKRERKKKKKK 
SERRE EEEEREEREEREEREREREKEKEEEREEEEEREEEREEAEEEAEREREKEEREKREEKKEERE 


#3,TSTNO 
aiST4, eNEXT 


DPTS,REG 
R5,BITST 


#B81T2,aDPRS 
R5,BITST 


TEST TRANS sTANS BITS 


: TERMINAL READY R 


SHUT OFF CLOCK FOR IDLE SYNC 


: IDLE SYNC R/W 


SEQ 0024 


CZDP MACY11_30A(10 


52). 30-JAN-79 15:40 PAGE 27 
CZDPAC .P11 30-JAN-79 15:40 


U 
ISSUE RESET AND VERIFY ALL BITS THAT ARE 
TO BE CLEARED BY RESET-~WERE : 


SEQ 0025 
1135 001642 000002 BIT1 
1136 001644 052777 000004 177360 BIS #B1T2,aDPRS ;START CLOCK 
1137 001652 004537 012542 JSR R5,BITST SECONDARY TRANSMIT R/W 
1138 001656 000010 BIT3 ; 
1139 1660 004537 012542 JSR R5,BITST STATUS INTERRUPT ENABLE R/W 
1140 001664 000040 BITS 
1141 001666 004537 012542 JSR R5,BITST ; TRANSMITTER INTERRUPT R/W 
1142 001672 000100 BIT6 
1143 001674 004537 012542 JSR R5,BITST ; DONE 

1144 001700 000200 BIT7 

1145 001702 004537 012542 JSR RS,BITST sRING FLAG R/W 

1146 001706 020000 BIT13 

1147 001710 004537 012542 JSR R5,BITST CARRIER DOWN 

1148 001714 100000 BIT15 

1149 001716 004537 012542 JSR R5,BITST RECEIVER OVERUN FLAG R/W 

1150 001722 040000 BIT14 

1151 001724 104400 SCOPE 

1152 

1153 

1154 

1155 

1156 RESET TEST 

1157 SET PROCESSOR PRIORITY TO 7 

BF ;SET ALL WRITE BITS IN T & R STATUS 

He! 

1162 NOTE: IF BITS/CHAR BITS ARE SET TO ALL 1°S RCV WILL 

saat NOT GO ACTIVE 

1165 TEST READ/WRITE BITS OF RECEIVER STATUS 

1166 SECTION 1 
1167 
1168 LRRRERERERKKEK 
1169 : * 
1170 3 TEST 4 
1171 ; * 
1172 [RARER REERERE 
1173 ‘ SERRE REREKEEREKEEKEEREEEKEKEEEKEEEREEEEEEKKEEEEREREREEEKEEEEEEREREE 
1174 001726 012737 000004 001072 TST4: MOV #4,TSTNO 
1175 001734 012737 002006 001062 MOV #TSTS NEXT 
1176 001742 005077 177272 CLR aDPTS CLEAR TRANSMITTER STATUS 
1177 001744 012777 000004 177256 MOV #B1T2,aDPRS MAINTENANCE MODE 
1178 001754 612777 143707 177250 MOV #143707, aDPRS 7SET ALL RECEIVER STATUS BITS 
1179 017701 177244 MOV @DPRS Ri :SAVE THE RX STATUS 
1180 001766 042701 010000 BIC #81T12,R1 CLEAR THE PARITY BIT 
1181 001772 012700 003707 MOV #3707,R0 3SET RO FOR ERROR MESSAGE 
1182 001776 020001 CMP 0,R1 31S THE STATUS WHAT I EXPECTED?? 
1183 002000 001401 BEQ +4 7BR IF STATUS IS OK. 
1184 002002 104001 HLT 1 ERROR RX STATUS NOT WHAT EXPECTED. 
11 2004 104400 SCOPE ;SCOPE THIS TEST. 
18g 
1189 TEST ALL READ/WRITE BITS OF THE TRANSMITTER STATUS 
1190 ;SECTIGN 2 


o 


CZDP MACY11 ap ne — 15:40 PAGE 28 
CZDPAC.P11 30-JAN- 740 SEQ 0026 


1191 


— 
— 
.*] 
m 


SREKRKKKKKKEKKK 


; TEST 5 


RRRKKKKKKEKKK 
~mARAALAAALELESAASLASASLELELE SLES ES ES ESE CSCC SCC CC CC eee cece ce ccc rT aces. ss 
012737 000005 001072 TST5: #5, TSTNO 
0 002066 001062 MO #TST6,NEXT 
000004 177202 #8172. aDPRS :SET MAINT MODE 
160353 177202 #160353, aDPTS :SET R/W BITS ON TX 
RO sSET FOR A DELAY 
000001 : “. RO ‘WAIT FOR JSLEAR TO SEND AND REQUEST TO S 


:TO COME 
177166 aDPTS,R1 SSAVE THE TX STATUS. 
163353 #163353,R0 7SET RO FOR ERROR MESSAGE. 
RO,R1 SIS THE TX STATUS CORRECT?? 
BR IF GOOD 


:TX STATUS ERROR 
:SCOPE THIS TEST 


» 2) 
W 


SSLESRE 


+4 


SeeRaRaTes 


7 ISSUE ‘RESET’’ AND VERIFY ALL BITS ARE CLEARED 
zSECTION 3 


SKKKEKEKKKKKKK 


; TEST 6 
> * 


Settitiii tits: 
SIAC EOI III IIIS IIOIOIIOOIOIOOIOUIOIIOIIOIIUIIIOIOIUI III Ett tik 
012737 000006 001072 TSTS: #6,TSTNO 
002140 001062 #TST7 NEXT 
000004 177122 MOV #B1T2,aDPRS SET MAINT MODE 
143707 177114 BIS #143707, aDPRS sWRITE THE STATUS REG 
: ISSUE RESET IN + be 


MNMNNNNoNoNoN 
ed ed ae ed ed ae ad cd ed 
—"OVOONAUSWN—oO 


mr 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
4 
1 
j 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


VARY 
Nm 


177104 


:BR_IF GOOD 

SET RO FOR ERROR MESSAGE 
-?RX_CSR_NOT CLEARED BY INIT. 

:SCOPE THIS TEST 


;VERIFY ALL READ/WRITE BITS OF TRANSMITTER STATUS ARE CLEAR 
ZSECTION 4 

SAAR KEKKKKE 

> TEST 7 
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CZDPAC .P11 30-JAN-79 


000007 001072 
002212 001062 
000004 177050 
160353 177050 


177040 


012737 010 001072 
002272 001062 
160377 177004 


176774 
176770 


176756 


002272 012737 000011 001072 


Pil Ralialalialelelaleletelatel 


FEAR REAR AREARRERARRERAREERRARERAARAEAREARAERRARAEEREREKRARHERARE EE 


TST?7: #7, TSTNO 
#TST10,NEXT 
#8112, aDPRS 
#160353, aDPTS 


RO 
@DPTS,R1 
R1 


+6 
RO 
: 


;SET MAINT Tare 
SWRITE TX STA 
ISSUE A RESET” TNSTRUCT ION 
[FLASH THE LIGHTS. 
SAVE _TX STATUS 
iTS 4 ZERO?? 
F GOOD 


SET RO FOR ERROR M 
:TX STATUS REG NOT PEROED BY INIT 
[SCOPE THIS TEST 


TEST READY BIT CLEAR BEFORE READY CAN COME UP 


SAAR EREH 
: TEST 10 
. * 


° 
SRR KRKERE 


FERRER REE REE RRER RRR EERE EEE EERAEEREREREREEREEEE EEE 


TST10: #10,TSTNO 
MO #TST11,NEXT 
#160377, aDPTS 


:BIT INTERAC! ION TEST 


SET EACH BIT AND VERIFY THAT ONLY THAT 


RECEIVER STATUS BIT VALIDITY TEST 


eect citi itis 
; TEST 11 


SRAEKKEKKEKKKK 


;LOAD STATUS 

: ISSUE RESET INSTR. 
sFLASH THE LIGHTS 
SAVE THE STATUS. 


READY CLEARED 
ES 


sREPORT ERROR 


STATUS CLEAR 
ES 


sREPORT ERROR 


BIT IS AFFECTED 


MARA ASAAAASASARASLESLASELESE RSE SEER SERS RE ERR REESE PEPER ESE SSS SEO SCLOS 


TST17: MOV #11,TSTNO 


SEQ 0027 








CZDP 


MACY11 


CZDPAC P71 


1303 
1304 
1305 


ese 


WNWNNWNNWWNNWNWG 
Wad oo ed aarti 
AUFSWN—O OONAUSWR—O 


ot ts 
Mrow 


WNWWANWWG 


1339 


a a de cee a ce ee ed ee en ed 
DARAAAAAAR EERE RR LR A 
DWNAMEWN—O OONAUSRWR Oo 


30A(10 
30-JAN- 


52) 
79 15 


012737 002360 001062 
005000 


013737 
104405 


1 
104405 
000002 
104405 
000004 
104405 
000 


012737 
BEE 24 


005000 
013737 
005077 
104405 
00000 
104405 
00000 
104405 
0000 


104405 
00004 


001232 


000012 
002456 
001240 
176630 


013110 


001072 
001062 


013110 


+ 7 aia 15:40 PAGE 30 


; TRANSMITTER STATUS BIT VALIDITY TEST 


MOV 
CLR 


REECE KKKKK 


TST le: 


TEST 12 


KKK KEKKKKEKKEK 
SRE 


* 


MOV 


2 il aa 
DPRS ,REG 


#12,TSTNO 


#TST13,NEXT 


RO 
DPTS,REG 
aDPTS 


i STRIP’ SYNC 

sHALF DUPLEX 
sMAINTENANCE MODE 
; INTERRUPT ENABLE 
; DONE 

;BITS/CHAR 


TEST XMIT STATUS 


:CLEAR TRANSMITTER STATUS 


TERMINAL READY 
IDLE SYNC 
MISC TRANSMIT 
STATUS ENABLE 


; TRANSMITTER ENABLE 


; TRANSMITTER DONE 
RING FLAG 
RECEIVER OVERRUN 
CARRIER DOWN 


SEQ 0028 


ZDP 
1359 
1360 
1361 


ay 


SEES 


& 


ae ee ee 
-ov0 


aay 
Nm 


SSPSSREESRERSS 


‘Oo 
uw 


ee 8 et sh a td 2 = 0 ot a ot I a 


WWNWWAWAWAWG 
R 


Ye) 
N 


C MACY11 wee hoe y 
CZDPAC.P11 


30-JAN-79 


012737 


104 
002000 
104400 


15: 


003707 


+ ai 


001072 
0 


176510 


15:40 PAGE 31 


VERIFY BIT CLEAR ONLY CLEARS SPECIFIED BIT 


RECEIVER TEST SECTION 


"RERKKKKKKKKKH 


Be Be Be Be Be Be 


TST13: 


TEST 13 


KERR KKEKK 
SERRE RRR ERE ERE RK EKER ERE KERR EERE ERE EERE EERE 


* 


MOV #13, TSTNO 

MOV #TST14,NEXT 

MOVB  #26,aSYNC ZLOAD SYNC WITH ANYTHING 
MOV DPRS REG = TEST RCV STATUS 

MOV #3707, TMPDAT :STORE STATUS IMAGE 

MOV #3707. aDPRS :SET UP STATUS 


CLEAR :STRIP SYNC 

BITO 

ee HALF DUPLEX 
aa sMAINTENANCE MODE 
CLEAR sRECEIVER INT ENB 
BIT6 

CLEAR sRECEIVER DONE 
BIT7 

CLEAR ;BITS/CHAR 

BIT8 

CLEAR : e oe 

BIT9 

CLEAR : oe oe 

BIT10 

SCOPE 


; TRANSMITTER TEST SECTION 


:NOTE: 


"SEND REQUEST’' IS SET BY "IDLE SYNC*’ 
‘CLEAR-TO-SEND'' IS SET BY MAINTENANCE MODE 


SEQ 0029 


CZDP_MACYTT, 30A(1052)__30-JAN-79. 15:40 PAGE 32 
CZDPAC .P11 30=-JAN-79 740 


RRR KEKKKEEEE 
*® 


; TEST 14 


“RRKEKKKKKKKKK 
—MmARASAASAAAAALSLALALASSLESLE SLES ESS ESSE SCS ECCS SESE LAE SCALA AESLAESACASAEALASALAS & 
012737 014 001072 TST14: MOV #14,TSTNO 
001062 wtsiis NEXT 
177776 40,P :SET STATUS TO LEVEL SEVEN 
176416 *alTD SDPRS SSET MAINTENANCE MODE 
176416 #160353,aDPTS :SET UP STATUS 
001136 #163353. TMPDAT :STORE STATUS !MAGE 
#2600. .R 0 [DELAY 6MS FOR SEND REQUEST 


BN “¢ 
176372 er + SEND REQUEST UP 
.+ 


;YES 
[REPORT ERROR 
001240 013110 MO DPTS,REG : TEST TRANS 
; TERMINAL READY 


003002 001136 #3002, TMPDAT CLEARING IDLE SYNC SHOULD CLEAR SEND REQUEST 
000002 176340 #2,aDPTS :CLEAR IDLE SYNC 
007020 ries sWAIT FOR ''CLEAR-TO-SEND’’ TO DROP 


72 
001136 TMPDAT ,RO 
176320 @aDPTS,R1 
001136 176312 ee feee SYNC AND SEND REQUEST CLEAR 
.+ 
1 REPORT ERROR 
003002 001136 #3002, TMPDAT sREINSTATE IMAGE 
000002 176272 #2,aDPTS sREINSTATE STATUS 
:MISC TRANSMIT 


:STATUS INTERRUPT ENABLE 
; TRANSMITTER INTERRUPT ENABLE 


000004 176242 #B81T2,aDPRS sMAINT MODE OFF (STOP CLOCK) 
002000 001136 #B1T10, TMPDAT ae *“*CLEAR-TO-SEND"* 


000004 176222 #B1T2,aDPRS MAINT MODE ON 
002000 #B1T10,TMPDAT SET ‘'CLEAR-TO-SEND’' TEST BIT 
004004 #4004, aDPRS SHUT OFF CLOCK 
002000 001136 #B1T10,TMPDAT CLEAR -TO ~SEND 
RING FLAG 


RECEIVER OVERRUN 
CARRIER DOWN 





CZDP 


MACY11 wpe hn 


CZDPAC .P11 


1454 
5 


003046 


003264 
003272 


30-JAN-79 
104400 


012737 


en 
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100040 


000100 
000001 


000016 
003422 


175756 


001072 
001062 
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SCCPE 


LARA ERE EERE EREARERRARERREREREREREREREEHEERRERE EEE 


SHREK KKKKH 


;PRIORITY TESTS 


VERIFY THAT THERE ARE NO STATUS INTERRUPTS 


WHEN PS=5 
S INTERRUPT WILL TRAP TO ERROR MESSAGE 


SERA 


+ TEST 15 


SEERA REE REAR AERERERE TERETE RRR E EERE 


TST15¢ 


VERIFY 


NO TRANSMITTER READY INTERRUPTS 


#15, TSTNO 
#TST16,NEXT 
#240,PS 


#F TINT, aDPTIV 


#B1T6,aDPTS 
#B1T0,aDPTS 
#B81T1,aDPTS 
#B1T2,aDPTS 


#8116, aDPTS 


sPRIORITY=5 

SET FOR UNEXPECTED INTERUPT. 
SET FOR UNEXPECTED INTERUPT. 
>SET MAINTENANCE MODE 

ZSTATUS INTERRUPT ENABLE (SIE) 
[RING FLAG 


CLEAR CSR 
: INT ENB (STATUS) 
:RECEIVER, OVERRUN FLAG 


LEAR 
INT ENB (STATUS) 


CARRIER DOWN FLAG 
ZCLEAR CSR 


:XMIT_INT ENB 
;NO 


: TEST FOR CONTROL OF STATUS INTERRUPT ENABLE BIT 
:NO_INTERRUPT SHOULD OCCUR IF INT ENB IS NOT SET 
: INTERRUPT VECTOR POINTS TO ERROR MESSAGE ROUTINE 


SRA RRKEKEKK 


: TEST 16 


. 
° 
. 


° 
PERAK 


DARE REE ERE EERE REE RAE EERE EERE ERE ERR EERE 


TST16: 


MOV 
MOV 


#16,TSTNO 
#1ST17,NEXT 


SEQ 0031 


CZDP = MACY11 30A(1052) 30-JAN=79 15:40 PAGE 34 
CZDPAC.?11 30-JAN-79 15:40 SEQ 0032 

1510 012737 177776 MOV #200,PS :PRIORITY=4 

1511 06 012777 014532 175736 MOV #FTINT, a@DPTIV :SET FOR UNEXPECTED TX INTER. 

1512 003314 012777 014536 175724 MOV #FRINT,@DPRIV SET FOR UNEXPECTED RX INTER. 

1513 003322 052777 175710 1$: BIS #81113, aDPTS [RING FLAG 

1514 003330 042777 020000 175702 BIC #81113. aDPTS = CLEAR 

1515 36 052777 0 175674 BIS #31114, aDPTS :RECEIVER OVERRUN FLAG 

1516 042777 175666 BIC #B1T14,aDPTS LEAR 

1517 003352 052777 100000 175660 BIS #61115, aDPTS SCARRIER DOWN FLAG 

1518 003 042777 10 175652 BIC #81115. aDPTS 

1519 052777 160000 175644 81S #160000, aDPTS :SET ALL STATUS ERROR BITS 

1520 003374 042777 160000 175636 BIC #180000, aDPTS = CLEAR 

1521 003402 162737 000040 177776 SUB #40,PS “DECREASE PRIORITY LEVEL 

1522 003410 032737 000340 177776 BIT #340,PS 

1523 003416 001341 BNE 1$ 

1524 003420 104400 SCOPE :YES 

1526 ZVERIFY THAT ALL STATUS BITS INTERRUPT AT ALL LEVELS 

1527 SEQUAL TO OR LESS THAN 4 

1528 SIF THE DEVICE INTERRUPTS SUCCESSFULLY, THE 

1529 SINTERRUPT SERVICE ROUTINE WILL RETURN 

1530 :THE PROGRAM COUNTER TO THE INSTRUCTION AFTER 

1531 STHE HLT CALL 

1532 

1533 DOR ik tk 

1534 : * 

1535 : TEST 17 

1536 : 

1537 DIK TR i Rk 

1538 FREER RRR RRR KR REE EREARREREPEEREEREREEEEREKEE 

1539 903422 012737 000017 001072 TST17: MOV #17, TSTNO 

1540 003430 012737 003614 001062 MOV #TST20,NEXT 

1541 003436 012777 003474 175606 MOV #18, gaberiv :SET UP INTERRUPT VECTOR=RTI 

1542 003444 012737 090200 177776 MOV =PRIORITY= 

1543 003452 052777 000040 175560 BIS sere, SPs ‘INT ENB STATUS 

1544 003460 052777 020000 175552 BIS #81113, aDPTS [RING FLAG 

1545 003466 000240 NOP ‘SHOULD INTERRUPT AFTER NOP 

1546 003470 104003 HLT 3 [REPORT ERROR 

1547 003472 024646 PUSH. SP :+ERROR INDICATOR/NOPOP. SP 

1548 003474 042777 020000 175536 1$: BIC #81113, aDPTS [CLEAR RING 

1549 003502 022626 POP. SP 

1550 003504 012777 003534 175540 MOV #2$,aDPTIV :SET UP NEXT INTERRUPT VECTOR 

1551 003512 042737 000040 177776 BIC #BITS,PS [SET PRIORITY TO 4 

1552 003520 052777 040000 175512 31S #81114, aDPTS TRECEIVER OVERRUN FLAG 

1553 003526 000240 NOP 

1554 003530 104003 HLT 3 sREPORT ERROR 

1555 003532 024646 PUSH. SP 7+ERROR INDICATOR/NOPOP. SP 

1556 003534 042777 040000 175476 2$: BIC #81114, aDPTS SCLEAR RCV O RUN 

1557 003542 022626 POP. SP 

1558 003544 012777 003574 175500 MOV #3$,aDPTIV :SET UP NEXT INTERRUPT VECTOR 

1559 003552 042737 000040 177776 BIC 175,PS [SET PRIORITY TO 4 

1560 003560 052777 100000 175452 BIS #81115, aDPTS [CARRIER DOWN FLAG 

1561 003566 000240 NOP 

1562 003570 104003 HLT 3 ;REPORT ERROR 

1563 003572 024646 PUSH. SP 7+ERROR JNDICATOR/NOPOP. SP 

1564 003574 042777 100000 175436 zg: BIC #81115, aDPTS iCLEAR CARRIER DOWN FLAG 

1565 003602 022626 POP, SP 
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C 
CZDPAC .P11 30=JAN-79 


003604 012777 014532 175440 
003612 104400 


012737 000020 001072 
00 001062 


175376 


012737 000021 001072 
0 003774 001062 
000004 175320 


175322 
003764 175326 
000200 177776 
175304 

175274 


000100 
175270 
004704 


175250 


MOV #FTINT ,@DPTIV sFALSE INT TRAP 
SCOPE YES 


DOES LOADING XMIT BUFFER CLEAR XMT DONE 


“RARER 


; TEST 20 
: * 


ities iiss! 
SIRI III ISIOIIUIUIOIIIOI III IIIT REE RRR ttt 
TST20: #20,TSTNO 
MO #1ST21 .NEXT 
DPRS :CLEAR RCV STATUS 
weit? @DPTS 


aDPTS : DONE SET 


.*4 

REPORT ERROR 
RO,aDPTB ;LOAD BUFFER 
— io ty CLEARED 
.+ 


:REPORT ERROR 


VERIFY TRANSMITTER READY INTERRUPTS AT LEVEL 4 
zAT 8 BITS PER CHARACTER 


ERR KEKRKEKEK 


; TEST 21 


-eeeRRRRER ERR 
SEAR REE REE RERRERERRERERRERERRERERRRE EERE RRR 
TST21: #21,TSTNO 
#TST22 NEXT 
#BIT2,aDPRS 
:CLR_ STATUS 


aDPTS 
#1$,aDPTIV [TEST PASS VECTOR = RT1 TO IT3A 
#200,PS [PRIORI TY=4 

RO, aDPTB LOAD XMIT BUFFER 

#B1T6,aDPTS :XMIT INT ENB 

abPTs READY CLEARED BY BUFF LOAD 

aa 


: REPORT ERROR 
2500. 5 MS 
§ : TRANSMITTER FAILED TO INTERRUPT 
NOPOP . S 


;+ERROR INDICATOR/ 
:CLEAR INT ENB 


VERIFY READY INTERRUPTS AT LEVEL 4 
:AT 7 BITS PER CHARACTER 


SEQ 0033 
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CZDPAC .P11 30-JAN-79 15:40 SEQ 0034 
1622¢ 
1623 PRR RR 
1624 3 * 
1625 s VEST a 
1626 é 
1627 PARRA RE 
1628 DORI III IOICIOISIOIIIIIOIOI IOI IIIIOIIUIIUIOIIIOIIOIOIOIOI OOOO IOI TIO I III III IOI IO 
1629 003774 012737 000022 001072 TST22: MOV #22.,TSTNO 
1630 004002 012737 004112 001062 MOV #TST23,NEXT 
1631 004010 012777 000004 175214 MOV 2 AS @DPRS 
1632 004016 005077 175216 CLR :CLR STATUS 
1633 004022 012777 004076 175222 MOV th aperiv :TEST PASS VECTOR = IT4A 
1634 004030 012737 000200 177776 MOV # :PRIORITY=4 
1635 004036 052777 000400 175166 BIS waite, @DPRS 3:7 BITS/CHARACTER 
1636 004044 110077 175172 MOVB RO, apP TB [LOAD XMIT BUFFER 
1637 004050 052777 000100 175162 BIS #8116, aDPTS :XMIT INT ENB 
1638 004056 105777 175156 TSTB aDPTS ;LOAD BUFFER CLEARED READY 
1639 004062 100001 L +4 sYE 
1640 004064 104000 HLT REPORT ERROR 
1641 004066 104403 004704 DELAY 2500. MS 
1642 004072 104003 HLT 3 : TRANSMITTER FAILED TO INTERRUPT 
1643 004074 024646 PUSH. SP 3: +ERROR INDICATOR/NOPOP. SP 
1644 004076 005077 175130 1$: CLR @DPRS :CLR 7 BITS/CHAR 
1645 004102 005077 175132 CLR aDPTS SCLEAR INT ENB 
1646 004106 022626 POP. SP 
+ #4 004110 104400 SCOPE YES 
1649 ;VERIFY READY INTERRUPTS AT LEVEL 4 
ieay zsAT 6 BITS PER CHARACTER 
1652 PERRIER I 
1653 : 
1654 : 3r 
1655 : * 
1656 PRR RR I 
1657 IRA IIOIOI IO IOIOIOIIIAIOIOIIDIIIOOIOISIIIIOIOIOIIOIOIUIIIOIIUIIDICOIIUIDIIIIUUII En titi 
1658 004112 012737 000023 001072 TST23: MOV #23,TSTNO 
1659 004120 012737 004224 001062 MOV #TST24,NEXT 
1660 004126 012777 000004 175076 MOV #B1T2,aDPRS 
1661 004134 012737 000200 177776 MOV #200,PS ;PRIORITY=4 
1662 004142 005077 175072 CLR aDPTS ;CLR STATUS 
1663 004146 012777 004214 175076 MOV #1$,aDPTIV 7 TEST PASS VECTOR = ITSA 
1664 004154 052777 001000 175050 BIS #B1T9,aDPRS 26 BITS/CHARACTER 
1665 004162 110077 175054 MOVB RO,aDPTB ;LOAD oy BUFFER 
1666 004166 052777 000100 175044 BIS #BIT6,aDPTS 7XMIT INT ENB 
1667 004174 105777 175040 TSTB @aDPTS oe BUFFER CLEARED READY 
1668 004200 100001 ‘ BPL .* 
1669 004202 104000 HLT : REPORT ERROR 
1670 004204 104403 004704 P DELAY 2500. MS 
1671 004210 104003 HLT 5 : TRANSMITTER FAILED TO INTERRUPT 
1672 004212 024646 PUSH. SP 3 +ERROR INDI CATOR/ NOPOP . SP 
1673 004214 005077 175012 1$: CLR @DPRS :CLR 6 BITS/CHAR 
1674 004220 022626 POP. SP 
> 5 004222 4 SCOPE 
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TEST SYNC BUFFER IS READ/WRITE 
NOTE: SWO9=1 WILL FREEZE ON CUPRENT SYNC 


SREP KEEKRKKKEH 


; TEST 24 


eit iiiiiii sy 
= ag game tg 2 ee ae ir rtp i pagrecatnenrelregitiniomcrtper pee 
012737 001072 TST24: #24, 
004346 001062 #iST 25. NEXT 
001064 


:CLEAR TEST DATA 
CLEAR RECEIVER STATUS 


:CLEAR SYNC 


sRRANCH IF SYNC CLEARED 
sREPORT ERROR 
174732 : TMPDAT , @SYNC sLOAD SYNC 
TMPDAT ,RO 
@SYNC,R1 
174714 MPB TMPDAT , @S YNC 71EST IF LOAD Ok 
+4 BRANCH OK 


j “REPORT ERROR 
TMPDAT :NEXT SYNC 


NO, TEST NEXT SYNC 
174672 MOVB #26 ,ASYNC sANY SYNC BUT ALL 1°S 


oO 
N 


sREAD/WRITE ALL CHARACTERS IN SYNC EXTENSION 
NOTE: SWO9=1 WILL FREEZE ON CURRENT SYNC 


ett aat iti i is 
; TEST 25 
SR OR i Rk 
SIO IOI IIOIIISIIOIIOISIOI I IIOICIIOIUIOIIOIISIUIDIDISIOIIIDIOIDIIOIUIDIOIIUIUIOIOI ODIO I otok 
012737 0000 TST25: #25, TSTNO 
#TST26,NEXT 
#B1T8,SAVSR1 is BITS/CHAR 


1 . BRANCH AROUND TEST 
NEXT ,RETURN 
@RE TURN 


ce ee ed ed cd aed ed ed 


Mnnr 


f :LOAD TMPDAT WITH ZEROS 
174626 17 ,@SEXT ;LOAD SYNC EXT WITH 1°S 
174620 2 ;LOAD SYNC EXTENSION 
@SEXT,R1 


S2SSo 


17 
171 
17 
17 
17 
17 
17 
17 
17 
17 
17 
17 
17 
17, 
17. 
17, 
17, 
17 
17, 
172 
172 
17, 
17, 
17 
17 
17 
7 


MPDAT ,RO 
001136 OSES. ORE a SYNC LOAD CORRECTLY 


a* e 


WN 
wW 
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sREPORT ERROR 


36 TMPDAT NEXT SYNC 
000020 001136 #20, TMPDAT HAVE ALL SYNC'S BEEN TESTED 
2$ ; CONTINUE TEST 


C EXT 
BRANCH IF SYNC CLEARED 
REPORT ERROR 


pxkkkkkkkekkkkiee SYNC TESTS «xe areeeaae aa eeekkkekin 


SYNCHRONIZATION CHARACTER TEST 
ISSUE ALL SYNC CHARACTERS AND VERIFY THAT IT WAS THE 
CORRECT SYNC 


KEKE KEEKKKKK 


; TEST 26 


: * 
etait itiii it. 

III IIIS IIIS IIUIOICISIOIOIUIUIOIOIOIOIUIOIOIOIIUIOIUIDISIIIIUIDIDISIIIDIDISIIIDIDIDISISIIOIDIN 

012737 000026 001072 TST26: #26, TSTNO 
001062 #tsie?, NEXT 

EXT :CLEAR SYNC EXTENSION 
:CLEAR TRANSMITTER STATUS 
: CLEAR ea STATUS 


#200,PS ITY 

#377. SLIM [SYNC LIMIT FOR 8BITS/CHAR 
#400, BP SINDEX TO CHANGE BITS/CHAR 
WITS PRs MODE 


;FIRST SYNC = 1 
174450 : MOV #FRINT,@DPRIV 7SET UP RECEIVER INT VECTOR TO ERROR 
: 6 2:10 CHAR TIMES FOR AL 


2 L 1°S IN BUFF 
174426 MOVB TSYNC ,@SYNC [LOAD SYNC BUFFER 
001152 @SYNC,TDATA STORE SYNC 
174416 TSYNC,,@DPTB :LOAD FIRST SYNC CHAR 
aDPTS ;READ 


BP 74 3 T AGAIN 
174372 #81111, aDPRS :TEST FOR oe ACTIVE 
+4 BRANCH IF NOT SET 
; PREMATURE ACTIVE 
174370 TSYNC ,@DPTB LOAD SECOND SYNC BYTE 
174366 #3$,aDPRIV SET UP TEST VECTOR 
aDPTS ; TRANSMITTER READY 


BP -74 >NO 
174346 TSYNC .aDPTB :XMIT 3ED SYNC AS DATA 
052777 174330 #B1T6,aDPRS :RCV INT ENB 


177776 


SESE ECR OR SS RSNRRRSRGS 
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1790 004702 104403 005670 DELAY ,3000. ; STALL y A CHARACTER TIMES 
1791 004706 104004 HLT 4 REPORT ERROR 
1792 004710 024646 . PUSH. SP 3 +ERROR iNDICATOR/NOFOP. SP 
1793 004712 017737 174316 001136 3$: MOV @DPRB, TMPDAT ;SAVE DATA 
1794 004720 013701 001136 MOV TMPDAT ,R1 
1795 004724 013 001144 MOV TSYNC ,RO 
1796 004730 023737 001136 001144 CMP TMPDAT , TSYNC + CORRECT SYNC CHARACTER 
1797 004736 001404 BEG YES 
1798 004740 042777 000004 174264 BIC #B1T2,aDPRS iNO. SHUT OFF CLOCK 
1799 004746 104001 HLT 1 SREPORT ERROR 
1800 004750 105777 174256 4$: TSTB a@DPRS Ao te CLEARED 
1801 004754 100001 BPL +4 
1802 004756 104000 HLT ‘REPORT ERROR 
1803 004760 042777 000100 174244 BIC #B1T6,aDPRS ;CLEAR REV INI ENS 
1804 004766 032777 004000 174236 BIT #81T11,aDPRS ;RECEIVER ACTIVE 
1805 004774 001001 BNE +4 ; YES 
1806 004776 104000 HLT [REPORT ERROR 
1807 005000 112777 000026 174230 MOVB #26 ,aSYNC ; CHANGE SYNC 
1808 005006 042777 004000 174216 BIC #B81T11,aDPRS :CLEAR RECEIVER ACTIVE 
1809 005014 032777 004000 174210 BIT #B1T11,aDPRS RCV ACTIVE CLEARED 
1810 005022 001401 BEQ +4 Yes 
1811 005024 104000 HLT “REPORT ERROR 
1812 005026 022626 POP. SP 
1813 005030 042737 000040 177776 BIC #BIT5.PS ;SET PRIORITY TO 4 
1814 005036 032737 040000 177570 BIT #BIT14,SWR ; TEST FOR SCOPE LOOP 
1815 005044 001002 BNE 5$ [BRANCH AROUND INC IF SCOPE 
1816 005046 105237 001144 INCB TSYNC sNEXT SYNC 
1817 005052 123737 001140 001144 5$: CMPB SLIM, TSYNC sHAVE ALL SYNC'S BEEN TESTED 
1818 005060 001246 BNE es ; 

1819 005062 5037 001144 CLR TSYNC YES 

1820 005066 053777 001142 174136 BIS BPC ,aDPRS 7DEC BITS/CHAR BY 1 BIT 

1821 005074 006237 001140 ASR SLIM ;DECREASE #BITS/CHAR 

1822 605100 062737 000400 001142 ADD #400 ,BFC :DEC BITS/CHAR BY 1 BIT 

1823 5106 022737 001400 001142 CMP #1400 ,BPC HAVE ALL CHAR SEIZES BEEN TESTED 
1824 005114 001225 BNE 1$ “NO 

ies? 005116 104400 SCOPE 

1827 pxakeeeeeSYNC EXTENSION TEST exxxxannnnn 

1828 

1829 DOOR ORK Ok Riek 

1830 : 

1831 3; TEST 27 

1832 3 

1833 LEAKE RR IR 

1834 DARI IOIIIIO III IOI UIIIIOIUI UII IOI IOI IOI IOI IOI IID IOI IOI Ot 
1835 005120 012737 000027 001072 TST27: MOV #27,TSTNO 

1836 005126 012737 005534 001C62 MOV #7ST30,NEXT 

1837 005134 032737 000400 001134 BIT #B1T8,SAVSR1 :DOES TWELVE BIT OPTION EXIST 
1838 005142 001005 BNE 1$ BRANCH IF NOT 

1839 005144 013737 001062 001060 MOV NEXT ,RETURN 

1840 005152 000177 173704 JMP @NE XT 

1841 005156 012777 002104 174046 1$: MOV #2104, aDPRS zSET STATUS TO 12 BITS/CHARACTER 
1842 005164 012737 000400 001144 MOV #400, TSYNC [FIRST SYNC CHARACTER 

1843 005172 105077 174040 CLRB aSYNC ;LOAD SYNC BUFFERS WITH 400 
1844 005176 112777 000001 174040 MOVB #1, 39SEXT ;LOAD SYNC BUFFERS WITH 400 
1845 005204 012737 007400 001140 MOV #7400,SLIM 7SET UP SYNC LIMIT 
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1846 005212 012737 002000 001142 MOV #2000, BPC :SET # BITS/CHAR TO 12 
1847 005220 012777 014536 174020 2s: MOV #FRINT, aDPRIV ‘RCV INTERRUPT VECTOR = ERROR 
1848 005226 104403 006000 DELAY  ,6000 [WAIT FOR ALL 1'S 
1849 3;TO SHIFT INTO XMIT,RCV BUFS 
1850 005232 105077 174000 CLRB = @SYNC [CLEAR SYNC EXTENTION 
1851 005236 113777 001145 174000 MOVB —«- TSYNC +1, @SEXT [LOAD NEXT SYNC 
1852 005244 013777 001144 173770 MOV TSYNC,@DPTB : TRANSMIT FIRST SYNC 
1853 005252 105777 173762 TSTB aDPTS sWAIT FOR ‘DONE’ 
1854 005256 100375 BPL = : 
1855 005260 032777 004000 173752 BIT #B1T11,aDPTS :TEST FOR PREMATURF ‘‘ACTIVE'' 
1856 005266 001401 BEQ +4 ‘NO 
1857 005270 104000 HLT [REPORT ERROR 
1858 005272 013777 001144 173742 MOV TSYNC,@DPTB ; TRANSMIT SECOND SYNC 
1859 005300 105777 173734 TSTB ~—s aDPTS ;WAIT FOR ‘DONE'' 
1860 005304 100375 BPL a4 
1861 005306 012777 005360 173732 MOV #3$,aDPRIV “SET UP RECEIVER INT VECTOR 
1862 005314 052777 000100 173710 BIS #B1T6,aDPRS :RCV INTERRUPT ENABLE 
1863 005322 013777 001144 173712 MOV TSYNC ,@DPTB ; TRANSMIT re ere AS DATA 
1864 005330 105777 173704 TSTB aDPTS ;WAIT FOR ' 
1865 005334 100375 BPL <4 
1866 005336 032777 004000 173666 BIT #81111, aDPRS “TEST FOR ACTIVE 
1867 005344 001001 BNE +4 :0K 
1868 005346 104000 HLT ‘REPORT ERROR 
1869 005350 104403 013560 DELAY ,600U. “WAIT FOR INTERRUPT 
1870 005354 104004 HLT 4 “DEVICE FAILED TO INTERRUPT 
1871 005356 024646 PUSH. SP ;+ERROR INDICATOR/NOPOP. SP 
1872 005360 017737 173650 001136 3$: MOV @DPRB, TMPDAT sSAVE RECEIVED DATA 
1873 005366 013700 001144 MOV TSYNC.RO 
1874 005372 013701 001136 MOV TMPDAT ,R1 
1875 005376 023737 001144 001136 CMP TSYNC, TMPDAT :COMPARE SYNC 
1876 005404 001401 BEQ +4 “BRANCH IF SYNC OK 
1877 005406 104001 HLT 1 ;REPORT ERROR 
1878 005410 022626 POP. SP 
1879 005412 042737 000040 177776 BIC . #BIT5,PS ;LOWER PRIORITY 
1880 005420 042777 004000 173604 BIC * #BIT11,aDPRS ?CLEAR ACTIVE 
1881 005426 042777 000100 173576 BIC #8116, aDPRS [CLEAR INT ENB 
1882 005434 032737 040000 177570 BIT #B1T14,SWR :TEST FOR SCOPE LOOP 
1883 005442 001002 BNE . 4$ ‘BRANCH AROUND INC IF SCOPE 
1884 005444 105237 001145 INCB TSYNC+1 zs INC TO NEXT TEST SYNC 
1885 005450 123737 001145 001141 4$: CMPB = ~—sSWw TSYNC +1,SLIM+1 SHAV VE ALL SYNC'S BEEN TESTED 
1886 005456 001404 BEQ . 5$ YES 
1887 005460 112777 000026 173550 MOVB ' #26,a@SYNC 
1888 005466 000654 BR 2$ 
1889 005470 005037 001144 5$: CLR TSYNC ZCLEAR TSYNC 
1890 005474 006237 001140 ASR SLIM [DECREASE SYNC LIMIT 
1891 005500 043777 001142 173524 BIC BPC ,aDPRS [CLEAR OLD CHAR SIZE 
1892 005506 062737 000400 001142 ADD #400,BPC ‘INC BITS/CHAR TO NEXT SIZE 
1893 005514 053777 001142 173510 BIS BPC ,aDPRS [CHANGE BIT MODE 
1894 005522 022737 003400 001142 CMP ~=°>—s #3400, BPC *CHECK CHARACTER SIZE 
1895 005530 001233 BNE 2$ :BRANCH UNTIL ALL SIZES HAVE BEEN TESTED 
1896 005532 104400 SCOPE 


1897 
1898 


3383833 


cel ee aad a cel ce ce ced ce ce ce ce cd ce ced ae ed a ee ae 


SSSISSSSess 
DONAARWY—O 


1920 
1 


; 
1939 


ed eh el a ah el al a oh ee cal eh 
ALSRERRLLLLLK 
MO OBNOUSWRH—oO 
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012737 


ops 4 


0004 
006112 


173250 


“ae 


0 
001144 


173430 


173426 
173354 
001136 


001144 


001144 
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SEQ 0039 
J RARER LARRRSSASZEALSESASSELESLESEL ESE SESE SSS ESSER ECCS SESE SSS 
ZIDLE SYNC TEST 
SRAISE ‘ACTIVE’ BY IDLEING IN EACH AVAILABLE CHARACTER LENGTH 
; ar eerie 
: TEST 30 
: Rkkkkkkkhhkhkk 
; KKK EAKKEKEKKKEKKKKEK Co Yee renns enrer pense iy woes jor 
TST30: MOV #30, TSTNO 
MOV sists) NEXT 
MOV #26, TSYNC ;LOAD TEST SYNC CHARACTER 
CLR apPTs ;CLEAR STATUS REGISTERS 
CLR @DPRS 
MOV DPRS,R3 SFETCH DEVICE ADRS 
INC R3 [CHANGE ADRS TO HIGH BYTE OF STATUS 
BIS #8112, aDPRS START MAINTENANCE 
MOV #6$,R2 [SET UP CHARACTER LENGTH SELECTOR 
1$: DELAY 6000. ;WAIT FOR ALL 1°S TO SHIFT IN 
MOV #2$, aDPRIV [LOAD DP RCV INTERRUPT VECTOR 
MOVB —‘TSYNC,a@SYNC [LOAD LOW BYTE OF SYNC 
MOVB -TSYNC+1,@SEXT :LOAD SYNC EXTENSION BITS 
MOV TSYNC, aDPTB [LOAD XMIT BUFFER 
BIS #B1T1.aDPTS [SET IDLE SYNC 
BIS #8116. aDPRS [SET RCV INTERRUPT ENABLE 
DELAY 12000. :WAIT FOR RCV INTERRUPT 
HLT i *REPORT ERROR 
PUSH. SP ;+ERROR INDICATOR/NOPOP. SP 
2$: MO | @DPRB, TMPDAT sSAVE RCV DATA 
3$: n°” 4 :CONTROL WORD 12 BITS=BR .+2 
MOV TSYNC,RO 
MOV TMPDAT ,R1 
CMP TMPDAT . TSYNC :DOES SYNC CHECK 
BEQ +4 “YES 
HLT i “REPORT ERROR 
4$: TSTB ss TMPDAT+1 VERIFY ONLY 8 BITS WERE TRANSMITTED 
BEQ +4 ‘BRANCH IF 
HLT REPORT ERROR 


MOV TSYNC ,RO 
MOV TMPDAT ,R1 


CMPB TMPDAT , TSYNC ; CHECK ee BYTE 


BEQ +4 BRANCH IF 
HLT 1 REPORT ERROR 
5$: i ay tte DID READING RCV BUFF CLR DONE 
~ 


;YE 
HLT ;REPORT ERROR 


5 MACY?1 30A(1052) 7 attach 15:40 PAGE 42 
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004000 #BIT 
004000 — 
+ 


11, @DPRS ;CLEAR ACTIVE 
11, @DPRS ZACTIVE CLEARED? 


YE 

; REPORT ERROR 

000002 #81T1,aDPTS CLEAR IDLE 

000040 #B1T5.PS LOWER PRIORITY TO 4 

ADJUST STACK 

(R2)+,@R3 CLEAR CHAR LENGTH 
(R2)+,aR3 SELECT NEXT CHAR LENGTH 

006116 Re 6S +4 END OF MODE? 


BN =NO 
000400 #B1T8,SAVSR1 i TEST 12 BITS/CHARACTER 
002000 173156 #81110, @DPRS :END OF 12 BIT TEST 


BN 
002000 173146 #B81T10,aDPRS :NO 
~(R2) ,=(R2) sADJUST CHAR SELECTION 
001400 173136 #1400, aDPRS CLEAR CHAR LENGTH LSB'S 
000400 005676 #400, 3$ CHANCE CONTROL WORD 
001426 001144 a aaa ; CHANGE SYNC 


; CHARACTER LENGTH SELECTION 
; CHARACTER LENGTH SELECTION 
000026 001144 : #26, TSYNC RESTORE TSYNC 
000412 005676 #412,3$ RESTORE CONTROL WORD 


;*aeeee INTERRUPT DRIVEN SEQUENTIAL DATA TESTeexennne 


PERAK 
* 


: TEST 31 


Preeti titi tt 
UIIISIIIIIIIIDIOIOIUIOIIDIIIIIOIOUIIUUUD EE EERE EERE EEE RE EER EEE EEE 
012737 001072 TST31: j #31,TSTNO 
001062 #TST32 NEXT 
001174 
:CLEAR SYNC + tai 
7 INIT RCV DAT 
;INIT XMIT DATA 
TRANSMITTER STATUS 
173026 :CLOCK ON + STRIP SYNC 
[CHAR LENGTH INDEX 
TEST 12 BIT CHAR MODE 


1 
#10000.LIMIT >SELECT END OF DATA 
#B81T10,aDPRS SELECT 12 BITS/CHARACTER 
00426 001144 MOV #426, TSYNC :SYNC_FOR 12 BIT CHAR 
172774 — :PLACE MSB OF SYNC IN SYNC EXT 


BR 
000400 001160 : #400,LIMIT ; TEMPORARY CHARACTER LIMIT 
000026 #26, TSYNC : INIT SYNC STORAGE 
014542 : #TV18,aDPTIV ; TRANSMITTER VECTOR 
012777 014650 172744 #RV18,aDPRIV RECEIVER VECTOR 
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012737 177776 sPRIORITY=4 

012737 000003 3,S SYNC COUNT=3 

113777 ;LOAD SYNC 

052777 . ;RCV_ INT ENB 

052777 172700 #340,aDPTS sSTATUS INT ENB 
7 TRANS INT ENB 
; TRANS DONE 

000001 ;WAIT FOR INTERRUPTS 

000776 

104400 3$: 

7 ****%*RANDOM DATA, RANDOM STALL ****x%x% 


REE EKKKH 


: TEST 32 


KEKE KEKK 

SAREE RARER EEE ERERKKERKEEEEK 

012737 001072 TST32: #32, TSTNO 

006472 001062 #isi55, NEXT 
CHLEN SET CHAR LENGTH TO 8 BITS 
001144 #26, TSYNC SYNC = 26 
172634 TSYNC , @SYNC LOAD SYNC BUFFER 
PC AND EXECUTE DATA + STALL MODES 


REPEAT PREVIOUS TEST AT 7 BITS/CHAR 


012737 00 MO #200, CHLEN ZSET CHAR LENGTH TO 7 BITS 
052777 #B1T8, aDPRS :7 BITS/CHAR 

042777 004000 1 #B1T11,aDPRS “CLEAR ACTIVE 

004737 PC,AND “EXECUTE DATA + STALL MODES 


REPEAT PREVIOUS TEST AT 6 BITS/CHAR 


012737 #300, CHLEN :SET CHAR LENGTH TO 6 BITS 
042777 0004 #B1T8, aDPRS 

052777 #B1T9aDPRS :SET MODE TO 6 BITS/CHAR 
042777 004000 #81111, aDPRS TCLEAR ACTIVE 


004737 013112 PC, AND sEXECUTE DATA & STALL MODES 
104400 
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pexeeeePARITTY TESTeexnen 
:VERIFY *PARITY'’ BIT=1 FOR ODD PARITY AND=0 FOR EVEN 


-REKKHERRKEEKK 


; TEST 33 


* 
KEKE KEKK 


012737 


001072 
001062 
001174 


015454 
001160 


001144 
172446 
001162 


001134 


172350 


SERA REE REE EEREREEREEE ES 


TST 


2$: 


33: 


#33, TSTNO 
#TST34,NEXT 
#2$ ,BACK 
@DPRS 


aDPTS 
#1401,RPRT1 
#400,LIMIT 
RDATA 

TDATA 
@SEXT 

#26, TSYNC 
TSYNC, @SYNC 
#3, SCNT 


aDPRS 
aDPT 
M118, SAVSRI 


#10000,.LIMIT 
#81110, aDPRS 
200,P 


a 
PIPRIY. aDPTIV 
#RPRTY ,@DPRIV 


#105, aDPRS 
#300,aDPTS 


LOAD RPRTQWITH BEQ .+4 
:SET UP CHARACTER LIMIT 


CLR RCV get 

:CLR XMIT DAT 

:CLEAR SYNC EXTENTION 
SET UP SYNC 

: INIT SYNC 

73 SYNC'S 

CLR RECEIVER STATUS 
:CLR_TRANSMITTER STATUS 
78/12 BITS/CHAR 

BRANCH IF 8 BITS/CHAR 
:SET LIMIT TO 12 BITS/CHAR 
OOTY 12 — MODE 


: TRANSMITTER PARITY TEST VECTOR 
;RECEIVER PARITY TEST VECTOR 


:RCV_INT ENB, STRIP SYNC, CLOCK 
:XMIT INT ENB,DONE 


RECEIVER OVERRUN TST 


SEEKER EKKK 


; TEST 34 


KKK KKKAKH 


012737 


052777 


001072 
001062 


172306 
001134 


172264 
172276 
172250 


cn ea a eee oC en 


TST 


34: 


#34, TSTNO 
PTS TSS LNEXT 
TMPDAT 
@SEXT 

#26 ,aSYNC 
$9! 18. SAvERt 


#81T10,aDPRS 
#3$,aDPTIV 
#B1T2,aDPRS 


:STOR TEST CHAR IN TMPDAT 


:CLEAR SYNC EXTENTION 
;LOAD SYNC BUFFER 


“BRANCH IF 8 BITS/CHAR 
sSELECT 12 BITS/CHAR 

:XMIT STATUS INT VECTOR=0*RUN 
: TURN ON CLOCK 
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2108 006752 104403 013560 
2109 006766 052777 000200 172244 
2110 006774 105777 17c240 
2111 007000 100375 ’ 
2112 007002 012777 000026 172232 
2113 007010 105777 172224 
2114 007014 100375 
2115 007016 012777 000026 172216 
2116 007024 105777 172210 
2117 0070 375 
2118 007032 013777 001136 172202 
2119 007040 105777 172174 
2120 007044 100375 
2121 007046 013777 001136 172166 
2122 007054 052777 000040 172156 
2123 007062 104403 005670 
2124 007 04000 
2125 007070 024646 
2126 007072 032777 040900 172140 
2127 007100 001001 
2128 007102 104 
2129 007104 005077 172130 
2130 007110 042777 004000 172114 
2131 007116 022626 
2132 007120 42737 000040 177776 
2133 007126 105237 001136 
2134 007132 001313 
2135 007134 104400 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2145 
2146 007136 012737 000035 001072 
2147 007144 012737 007340 001062 
2148 007152 005077 172062 
2149 007156 012777 000103 172046 
2150 007164 012777 014536 172054 
2151 007172 005037 001144 
2152 007176 012737 000200 17/776 
2153 007204 113777 001144 172024 
2154 007212 52777 000002 172020 
2155 007220 104403 005670 
2156 007224 105237 001144 
2157 007230 001365 
2138 007252 104400 
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2$: DELAY ,6000. 
BIS #8117, aDPTS 
TSTB aDPTS 
BPL <a 
MOV #26 ,aDPTB 
TSTB aDPTS 
BPL 74 
MOV #26,aDPTB 
TSTB aDPTS 
BPL 74 
MOV TMPDAT ,aDPTB 
TSTB aDPTS 
BPL 


-~4 
MOV TMPDAT , @DPTB 
BiS #BITS,aDPTS 
“Cm 5900. 


3$: BIT ers 
.+ 


aDPTS 
BIC #B1T11,aDPRS 


BIC #BITS,PS 
INCB  ~ the 


HALF DUPLEX TEST 


KKK 


TEST 35 


SEEKER KKERKKEKKK 


Be Be Be Be Be Be 


TST35: MOV #35, TSTNO 
MOV #1 5136,NEXT 


CLR aDP 
MOV #103,aDPRS 
MOV #FRINT ,@DPRIV 
CLR TSYNC 
MOV #200,P5 

1$: MOVB TSYNC , aSYNC 
BIS #B1T1,aDPTS 
DELAY 3000. 


INCB TSYNC 
1$ 


SCOPE 
:NOTE END OF THIS TEST. 


;WAIT FOR BCV TO CLEAR 
‘TRANSMIT FIRST SYNC 


; TRANSMIT SECOND SYNC 
; TRANSMIT DATA CHAR #1 


; TRANSMIT DATA CHAR #2 
:SET STATUS INT ENB 
WAIT FOR O*RUN INTERRUPT 

“REPORT ERROR, NO O*RUN INT 
;+ERROR INDICATOR/NOPOP. SP 
TEST FOR O‘RUN 

BRANCH IF O'RUN CAUSED INT 
REPORT ERROR 
SCLEAR XMIT STATUS 

:CLEAR ACTIVE 


;LOWER PRIORITY TO 4 
zs INC TO NEXT DATA 
;BRANCH IF NOT END 


SAKE KEEEEREEEEEEERRAEKEREREKEKEEEERKEEEKEKEEKREKEEEREEEREKERERKEKEE ER 


:CLEAR TRANSMITTER STATUS 

HALF DUPLEX, INT EN, TURN CiK ON 
>SETUP TEST VECTOR 

CLR TEST SYNC 

sPRIORITY=4 

;LOAD SYNC BUFFER 

: IDLE SYNC 

:DELAY 20.1 MS 

: HAVE ALL SYNC BEEN TESTED 


SEQ 0043 


CZDP 


CZDPAC .P11 


2185 


POMINM PNM NNYPoNoPry 
— 3 “gg ot oe 
RARAVLESSEVE 


2197 


MACY11_30A(1052) 
79 


30=JAN- 


012737 


104400 


30-JAN-79 
15:40 
177777 001150 
001050 
000340 177776 
177570 
012514 
012234 
012514 
012300 
00000; 001134 
012022 001060 
171530 
007306 001060 
000036 001072 
007470 001062 
001150 
000001 001134 
012022 001060 
171454 
016002 
26 171620 
171616 
171616 
171600 
014532 171612 
014536 171600 
000240 171574 
000240 171572 
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z******PART2 DB25S CONNECTOR TEST SECTION****%* 


BEGIN2: — 


BGNOA: 
PART2: 


1$: MOV 


peeeeeeTEST 1: 


SRR 
. * 
; TEST 36 


* 
° 
SERRE EKKK 


#-1 ,CABLE 
#STACK, SP 
#340,PS 

SWR 

BGNOA 
PC,CLRVEC 
PC,I.INE.N 
PART2 

PC, CLRVEC 
PC,LINE.X 
en 
#PART3 ,RETURN 
@RE TURN 
#PART2,RE TURN 


CABLE TESTS 


SET UP STACK POINTER 
SET PROCESSOR PRIORITY = 7 
TEST FOR CHANGE IN DP ADRS 


;BRANCH IF NO CHANGE 
LOAD ENTIRE VECTOR AREA WITH 


+2 


3; HALT 
"FETCH LINE NUMBER FROM SWR 


SUAS IOISISISISIISIIISIIOISIISIIISIIIIEISIIIIOOIDIISUIUUUEEOEUE EES OEE ies 


TST36: 


SCOPE 


#36, TSTNO 
#1S137,NEXT 
CABLE 


1$ 

aire. SAVSR1 
iPART3, RETURN 
wot TURN 


#8. "~ ie 
aDPT 

aSeX? 

@DPRS 

#FTINT ,ADPTIV 
#FRINT ,ADPRIV 
#240, aDPRP 
#240, aDPTP 


CLEAR NOISE FROM SYNC 

: CLEAR et He STATUS 

ZCLEAR SYNC EXT 

7CLEAR RECEIVER STATUS 

>SET UP TRANSMITTER TEST vectn 1 
SET UP RECEIVER TEST VECTOR 1 

7SET UP RECEIVER PRIORITY=6 

SET UP TRANSMITTER PRIORITY=6 
RUN CLOCK 


SYNCHRONIZATION CHARACTER TEST 8/12 BITS/“HARACTER 


: INTERRUPT ENABLE, COMPARE SYNC, 


TEST PARITY 


SEQ 0044 
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SRERRRERREEKRKE 


. . 
; TEST 37 


4 m 
-REKKKEAREREER 
MARA AAAAAAARAARARRERARASALARARARRAAEA RAR ASSSSARAS ER RSA SARA SSSR SSA S SS | 


012737 000027 001072 
012737 001062 


004537 
012737 000376 001160 
000403 


012737 001160 


000100 
C00300 


001000 
171376 
171366 


004000 171342 


015622 


#37 ,TSTNO 
#1ST40.NEXT 


R5 REE 
#376,LIMIT 


BR +1 
;REE WILL ENER HERE IF 12 BITS/CHAR 
MOV #77 IMiT 


-LIMi 
#2% ,BACK 
#TV18,aDPTIV 
#3,SCNT 


TSYNC,@SYNC 


TSYNC+1 ,@SEXT 


#B1T6,aDPRS 
#300, aDPTS 


w+ hhconmeatic 


#B1T11,aDPRS 
+4 


+ lahat 


#B1T11,aDPRS 
+4 


#SRVS ,ADPRIV 


11, @DPRS 
6,aDPTS 
 SWR 


4444 
— 
»~ 


-@SYNC 
MIT, TSYNC 


FLONADOS 
at Bat 
Oo 


—- 4k 





;REINIT FOR ig 

38 BIT SYNC LIM 

[BRANCH AROUND 12 BIT LIMIT 
SET UP 12 BITS/CHAR LIMIT 
SET UP RCV SERVICE RETURN 
;SET XMIT INT VECTOR TO SYNC 
3SYNC COUNT = 3 

sRUN C!OCK 


= LOAD SYNC BUFFER 
;XMIT INT ENB 


f+ REQUi ST UP? 


[REPORT ERROR 
[RUN CLOCK 


sRECEIVER ACTIVE 


NO 
;REPORT ERROR 
;RUN CLOCK 


zRCV ACTIVE? 
:NO 
;REPORT ERROR 


ves ACTIVE? 


;REPORT ERROR 
: TEST PASS VECTOR 
;RUN CLOCK 


REPORT ERROR 


LOOP 
; H IF SCOPE LOOP 
; CHANGE SYNC 
[NEXT SYNC, ENTRY FROM INTERRUPT 
SHAVE ALL SYNC'S BEEN TESTED 


CZDP 


MACY11_30A(1052) 


CIDPAC. P11 


2272 
3 


007756 


010214 


30=JAN-79 


104400 


012737 
012737 
004537 
012737 
000403 
012737 


032777 
001401 
104 


000 
104402 
000001 
032777 
001001 
104000 
012777 
104401 
000007 


104000 
042777 
042777 


30-JAN-79 
15:40 


000040 
010256 
013524 


000176 


004000 
004000 


004000 


015622 


004000 
000100 


171100 


171070 


171044 


171046 


15:40 PACE 


48 


SCOPE 


SYNCHRONIZATION CHARACTER TEST 7/113 BITS/CHARACTER 
; INTERRUPT ENABLE AND SYNC CHARACTER CHECK 


RAKE 


TS 


JSR 
RETURN ay IF 


TEST 40 


KERR KRKEKKKK 
SRE EERE RRR ERROR ERE EERE ERE KERR 


140: MOV 
MOV 


#40,TSTNO 
#15141 ,NEXT 
5 REE 


R5, 
8 BITS/CHAR 
tt LIMIT 


BR +10 
;RTETURN HERE IF 12 BITS/CHAR 
MOV #3776, 


1$: 


2$: 


LIMIT 
#8178, SDPRS 


#2$,BACK 
#FRINT ,@DPRIV 
#TV18,aDPTIV 
#3,SCNT 


TSYNC ,@SYNC 
#300,aDPTS 
#B11T6,aDPRS 


#B1T9,aDPTS 
+4 
#B1T11,aDPRS 
+4 
#81T11,a@DPTS 
+4 


#21T11,aDPRS 
+6 


#SRVS,aDPRIV 


#B1T11,aDPRS 
#B1T6,aDPTS 


sREINIT DPT 


37 BIT LIMIT 
;BRANCH AROUND 12 BITS/CHAR LIMIT 


311 _BITS/CHAR LIMIT 

37/11 BITS PER CHAR 

7SET UP RCV SERVICE RETURN 
sFALSE INT TEST VECTOR 

;SET iMIT INT VECTOR TO SYNC 
:XMIT 3 SYNCS 

RUN CLOCK 


;LOAD SYNC BUFFER 
:XMIT INT ENB 
:RCINT ENB 

:SEND REQUEST UP? 


REPORT ERROR 
RUN CLOCK 


RECEIVER ACTIVE 


:NO 
;REPORT ERROR 
RUN CLOCK 


RCV ACTIVE? 
:NO 
;REPORT ERROR 


omy ACTIVE? 


‘REPORT ERROR 
‘TEST PASS VECTOR 
[RUN CLOCK 
:REPORT ERROR 


CLEAR RCV ACTIVE 
CLEAR XMIT INT ENB 


SEQ 0046 


Soo 


CZDP. 


MACY11 wagon 
30-JAN- 


AC.P11 


010222 


010254 


010256 
01 


112777 
032737 
001300 


012737 
012737 


004537 
912737 
000403 
012737 


we 
5:40 


000026 
040000 


001144 
001160 


004000 
004000 


004090 


171006 
177570 


001144 


001072 
001062 


001160 


001160 


170566 


170556 


170532 
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SCOPE 


;DUMMY SYNC 

;TEST FOR SCOPE LOOP 

;BRANCH IF SCOPE 

sNEXT SYNC 

SHAVE ALL SYNC'S BEEN TESTED 


: SYNCHRONIZATION CHARACTER TEST 6/10 BITS/CHARACTER 
: INTERRUPT ENABLE AND SYNC CHARACTER CHECK 


EERE KKEKKKKEK 


TS 


& 


TEST 41 


141: 


;RETURN 


1$: 


* 


KET KKHKKKKKKEH 
SRR RARER RRR ERE KEREEE 


MOV 


#41,TSTNO 
a1stae, NEXT 


nS CIMT 

10 BITS/CHAR 
#1775, LIMIT 
#B1T9. aDPRS 
#2$,BA 

sii. scPTiy 
#3,SCNT 
#B1T6,aDPTS 


#81111, aDPRS 
#26 ,ASYNC 


TSYNC , @SYNC 
#81T6,aDPRS 
#300,aDPTS 


#B119,aDPTS 
+4 
#B1T11,aDPRS 
+4 
4#81T11,aDPTS 
+4 


#81111, aDPRS 
+4 


sREINIT DP11 

:6 8iT LIMIT 

;BRANCH AROUND 10 BIT LIMIT 
T x7 Ls PM ee, 


7 SE 
6710 B 

1 UP. Rev SERVICE RETURN 
[SET XMIT INT VECTOR TO SYNC 


:CHALGE SYNC 
RUN CLOCK 


;LOAD ro BUF FER 
He +" T ENB 

T INT ENB 
SEND REQUEST UP? 


REPORT ERROR 
RUN CLOCK 


RECEIVER ACTIVE 


‘REPORT ERROR 
SRUN CLOCK 


:RCV ACTIVE? 

[REPORT ERROR 

:RCV ACTIVE? 
ES 


SEQ 0047 


czbP MACY11 wat + pineal 15:40 PAGE 50 
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010502 104000 ;REPORT ERROR 
0105 012777 015622 170534 MOV #SRV5,aDPRIV ; TEST VECTOR 
01 RUN CLOCK 


6 
010516 REPORT ERROR 


010520 004000 17 : #81711, aDPRS 
000026 #26, aSYNC 
#B1T14,SWR ;TEST FOR SCOPE LOOP 
1$ BRANCH IF SCOPE 
001144 TSYNC “NEXT SYNC 
001160 LIMIT, TSYNC HAVE ALL SYNC'S BEEN TESTED 


010560 
: INTERRUPT DRIVEN SEQUENTIAL DATA TEST 


EERE ARKEEE 


; TEST 42 


kk tRR RRR 
jteeeeeneeenanenraneeaaaenntennnenannnanaannannanneenanseneeeeeneens 
010562 012737 900042 001072 #42,TSTNO 
910570 012737 010604 001062 #TST43,NEXT 
004737 014032 tries PC,SEQ.DATA :DC THE TEST. 


SERA RAKE EERE REET ERE REERKEKEE 


RANDOM CATA RANDOM IDLE 


RARER AKRKKH 
* 


; TEST 43 


ke RE ERE Re 
SRR RRR EEE ERROR RR EERE RRR EERE RRR RER ERD RES 
012737 000043 2 TST43: #43,TSTNO 
2 aTSTad, oNEXT 


at 
@SEXT :CLEAR SYNC EXTENTION 
tly. F CHLEN 4 A aay Lm TO 8 BITS 


1144 .TSYNC C 

170360 TSYNC asYNC [LOAD SYNC BUFFER 
#15371,R1 :PRIME RANDOM # GEN 
#72414 .R2 
#4036,R3 


sREPEAT PREVIOUS TEST AT 7 BITS/CHAR 


012737 ; 5 MOV #177600, CHLEN SET CHAR LENGHT TO 7 BITS 





CZDP 


MACY11 meh 


CZDPAC .P11 


BIpeys pg ere 
010712 04277 


010720 


010724 


010760 


30-JAN-79 


012737 


15:4 
000400 
00400 
013614 


013614 


wee. 


170320 
170312 


001156 


170256 
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sREPEAT 


BIS 
BIC 
JSR 


PREVIOUS TEST AT 6 BITS/CHAR 


#81T8,aDPRS 
#B1T11,aDPRS 
PC ,A2ND 


#177700, CHLEN 
#81T8,aDPRS 
#BITY,aDPRS 
#81111 ,aDPRS 
PC ,A2ND 


3:7 BITS/CHAR 
:CLCAR ACTIVE 


SET CHAR LENGTH TO 6 BITS 


:vET MODE TO 6 BITS/CHAR 
;CLEAR ACTIVE 


SEQ 0049 


Sood MACY11 whey 30-JAN=79 15:40 PAGE 52 


CZDPAC .P11 30-JAN-79 15:40 SEQ 0050 
2452 
2455 
2454 
2455 
si3$ :DB255 TEST CONNECTOR DISCRETE EVENTS TEST 
2458 VERIFY "SEND REQUEST'’ RAISES ‘'‘CLEAR=TO=SEND’’ AND ‘MODEM READY'' 
EHS ‘WHEN TRANSMITTER BUFFER IS LOADED 
2461 LEAR RRR E RE RI 
2462 3 
2463 ; TEST 44 
2464 $ 
2465 iter iri tii 
2466 Com et ae fine oe ee ee 
2467 010762 012737 000044 001072 TST44: MOV #44 ,T 
2468 010770 012737 011156 001062 MOV aT Tos NEXT 
2469 010776 012737 000240 177775 MOV #240,PS ;PRIORITY=5 
2470 011004 005077 170230 CLR @aDPTS 7CLR XMIT STATUS 
2471 011010 005077 170216 CLR @DPRS :CLR RCV STATUS 
2472 011014 104401 CLOCK ;RUN CLOCK 
2473 011016 000010 10 
2474 011020 012777 014532 170224 MOV #FTINT,ADPTIV sXMIT ERROR TRAP VECTOR 
2475 011026 012777 014526 170212 MOV #FRINT.@DPRIV ;RCV ERROR TRAP VECTOR 
2476 011034 052777 000040 170176 BIS #B1TS,aDPTS :STATUS+RDY INT ENS 
2477 011042 015777 001152 170172 MOV TDATA, aDPTB ;LOAD BUFFER 
2478 611050 104401 CLOCK ;RUN CLOCK 
2479 011052 0C0003 3 
011054 032777 001000 170156 BIT #B1T9,aDPTS ae REQUEST*’ ON 
2481 011062 001001 BNE +4 
2482 011064 104000 __ HLT UREPORT ERROR 
2483 011066 032777 OU2000 170144 BIT #B1T10,aDPTS ; CLEAR-TO=SEND’* UP? 
2484 011074 001001 BNE +4 3s YES 
2485 011076 104000 HLT [REPORT ERROR 
2486 011100 032777 010000 170132 BIT #B1T12,aDPTS :’ MODEM READY*' UP 
2487 011106 001001 BNE +4 ;YES 
2488 011110 104000 HLT [REPORT ERROR 
2489 011112 104401 CLOCK ;RUN CLOCK 
2490 011114 000012 12 
2491 011116 032777 001000 170114 BIT #BIT9,aDPTS ae REQUEST’ DOWN 
2492 011124 001401 BEQ +4 YES 
2493 011126 104000 HLT “REPORT ERROR 
2494 011130 032777 002000 170102 BIT #B1T10,aDPTS :" 'CLEAR-TO~SEND'' DOWN 
2495 011136 001401 BEQ +4 ZYES 
2496 011140 104000 HLT ;REPORT ERROR 
2497 011142 032777 010000 170070 BIT #B1T12,aDPTS 7’ MODEM READY'* DOWN 
2498 011150 001401 BEQ +4 YES 
2499 011152 104000 HLT ;REPORT ERROR 
2500 011154 104400 SCOPE 
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PERFORM PREVIOUS TEST AT 7/11 BITS/CHARACTER 


-KERERKREKKKKK 


; TEST 45 


+ fe ie te i kkk ee 
ee genni ger yr =a at enreeSieartme mae inte ner sAi an Setin 
012737 000045 001072 TST45: #45, TSTNO 
001062 #1st4e,NEXT 
177776 #240,PS ;PRIORITY = 5 
aDPTS ;CLR XMIT STATUS 
@DPRS :CLR_RCV STATUS 
170034 #FTINT,@DPTIV :XMIT ERROR TRAP VECTOR 
:RCV ERROR TRAP VECTOR 
37/11 BITS/CHARACTER 
#8175. aDPTS :STATUS4RDY INT ENB 
167774 MOV TDATA, @DPTB ;LOAD BUFFER 
RUN CLOCK 


167760 or Neat eS REQUEST’ ON 
+ 


REPORT ERROR 
167746 #81T10,aDPTS ; CLEAR=TO-SEND’' UP? 
BN +4 7YES 
[REPORT ERROR 
167734 * banat 3‘ MODEM READY'' UP 
o* | 


yw 
o 


4 3 4 9 9 9 


RAB R ED Rr 


7 YES 
REPORT ERROR 


: ;RUN CLOCK 
167716 ' > Nieman ae REQUEST‘’ DOWN 
.+ 


[REPORT ERROR 
167704 ye benctanatie 3" 'CLEAR-TO-SEND’ DOWN 
rm ; 


iY 
;REPORT ERROR 
167672 we Wiaaianeles 3’ MODEM READY** DOWN 
.+ 


YES 
;REPORT ERROR 
;PERFORM PREVIOUS TEST AT 6/10 BITS/CHARACTER 


177776 #240,PS zPRIORITY = 5 
aDPTS :CLR XMIT STATUS 
aDPRS eCLR RCV STATUS 
167652 #FTINT ,@DPTIV XMIT ERROR TRAP VECTOR 
#FRINT ,ADPRIV TRCV ERROR TRAP VECTOR 
#81T9,aDPRS 76 BITS/CHARACTER 
#B81TS,aDPTS play eg! INT ENB 
167612 MOV TDATA, @DPTB [LOAD BUFFER 
RUN CLOCK 


032777 167576 #81T9,aDPTS "SEND REQUEST'’ ON 


Sooooooo°o°0o 
22 SS 
ed ed a ced ed eh ed ed od ed ed 


PWNS SSNESS 
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011442 
011444 


leleolelelelelelelelelelelelelea) 
bath ab a ada ad ad ad adadadabad 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


eS SA RAR ESE ES 


WII ES BS SS 


aa ah ah a a ca aad cd cad a a el ee eed ed ed 
ae ad ad cad cea ed ced cad end aed ed eth ed es 
N 
mon 


elejlejelelelelelelelelojlolejaio) 
ftN 


ABRALSM 


30-J 
001001 
104000 
032777 
001001 
104000 
104401 
000010 
032777 
001401 
104000 
032777 
001401 
104000 
032777 
001401 


104400 


012737 


104000 
032777 
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15:40 


010000 167564 


001000 167546 
002000 167534 


010000 167522 


001072 
001062 
177776 


167460 
167452 


167440 


167426 


167414 


167402 
1673706 


167356 


“#2 
—— 
~—< 


#81712, aDPTS 
+4 


s 


Oo-on=zr 
mor r 
o=-4 OoO7- 


#81T9,aDPTS 
+4 
#81T10,aDPTS 
+4 


#81112, aDPTS 
+4 


; TERMINAL READY 


aa 


7 YES 
;REPORT ERROR 
:"MODEM READY’ UP 


YES 
SREPORT ERROR 
zRUN CLOCK 


iat REQUEST’ DOWN 


‘REPORT ERROR 
i CLEAR-TO-SEND"" DOWN 


: REPORT ERROR 
:' MODEM READY'’ DOWN 


YES 
“REPORT ERROR 


;DB25S TEST CONNECT CONNECTOR TEST 


; TERM RDY-RAISE ‘'CARRIER'' AND ‘RING FLAG'', NO INT ENB 


LARK RREKEKREK 


; TEST 46 


* * 
SREKKKKKEKKKKEK 


MARAAAAALALALALAAAALALEALSASE SALES SAAL ER AR ASSES ASA RASS ERAS ASE ALES SSS 


#46,TSTNO 
#TST47,.NEXT 
#240, 
aDPTS 
#FTINT ,@DPTS 
#81T0,aDPTS 
1500 
#8170, apPrs 


#81111, aDPTS 
+4 

#81113, aDPTS 
+4 

READY 


#81T0,aDPTS 
#B1T0,aDPTS 
+4 


#B1T11,aDPTS 


PRIORITY = 5 
:CLR XMIT STATUS 


ERROR TRAP VECTOR 
TERMINAL READY 

715MS PROPOGATION DELAY 
; TERMINAL READY 


YES 
“REPORT ERROR 
; CAR 


RIER 


SREPORT ERROR 


a FLAG UP 
TREPORT ERROR 


CLEAR TERMINAL READY 


Hn RDY DOWN 


REPORT ERROR 
[CARRIER DOWN 


SEQ 0052 
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oO 
—_ 
—_— 


:YES 
REPORT ERR 
167344 wr end aatide "CARRIER DOWN FLAG UP 
.+ 


YES 
SREPORT ERROR 
167332 #81T15,aDPTS CLEAR DOWN FLAG 


VERIFY THAT ‘RING’ AND ‘CARRIER DOWN’’ INTERRUPT 
167340 MOV #240, aDPTP : INTERRUPT PRIORITY 5. 
RCD: apPTs ZCLEAR XIMT STATUS 
@DPRS :CLEAR RCV STATUS 
167320 ahi of al : TEST A _VECTOR 
177776 SPRIORITY = 4 
167272 MOV #3115*B1T0, aDPTS : STATUS INTERRUPT ENABLE 
500 315.75 MS DELAY 


: “REPORT ERROR 


;VERIFY ‘‘CARRIER A. -g RAISES INTERRUPT 
014460 167270 RCD1: MOV TV25,aDPTIV NEXT TEST VECTOR 
012020 001174 rs ,BACK 
000200 177776 MOV #200,PS. 
000001 167234 I #B1T0,aDPTS CLEAR TERM. RDY. SHOULD SET ‘CARRIER DOWN’. 
001500 , 1500 315.75MS DELAY 
REPORT ERROR 
100000 167220 #B1T15,aDPTS CLEAR ‘'CARRIER DOWN’* 


ooo°oo 
ad od ad ad ad 


lelelelelelelele) 
ad ed ad aed aed ead eed eed 


i | 
SRE 


3 


ot ot et ot 
~— 

Oo 

No-—— 


0 
0 
0 
0 
0 
0 
0 
¢) 


ONO 
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;CABLE TEST WITH OUT EXERCISING THE SOFTWARE CLOCK. 
:IN THIS TEST FUNCTIONS OF THE CABLE WILL BE 

TESTED WITHOUT THE SOFTWARE CLOCK. THE CLOCK MUST BE 
; SUPPLIED BY THE DP11. 


012022 PARTS 
DF11=L TEST!!! 
VERIFY THAT LOADING THE TRANSMITTER BUFFER 
: BRINGS UP "REQUEST TO SEND’’ WHICH IN TURN WILL 
sBRING UP *'CLEAR TO SEND’* AND ‘MODEM READY'’. 
: VERIFY ALSO THAT THEY GO AWAY. 


RARER ERKEKEEH 


; TEST 47 


+ Rh ek i ek 
SAREE RRR RRR EERE REE EERE ERR RRR EERE EERE 
012737 000047 001072 TST47: #47,TSTNO 
016002 001062 #.EOP,NEXT 
000001 001134 > Waitin, 
+ 


:CLEAR THE TX STATUS 
;CLEAR THE RX STATUS. 
SET TIME OUT 


;LOAD THE TX BUFFER 


UPDATE DELAY 

:IS_ IT DONE? 

SERROR REQUEST TO SEND,CLEAR TO 
;SEND AND MODEM READY NOT UP. 
DELAY TIME OUT 


ae 
013000 167104 #1 008 A8P TS ARE THEY GONE ? 
* 


104 
110 
112 
114 
116 
120 
122 
124 
126 
1 
1 


2 
211 
211 
211 
211 
212 
212 
212 
212 
2134 
2136 


0 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 


sVERIFY THAT THE SETTING OF ‘TERMINAL READY’ BRINGS 
[UP "'RING'' AND "CARRIER DOWN'' ALSO VERIFY THAT 

: CLEARING "TERMINAL READY"’ BRINGS DOWN *RING'' 

AND "'CARRIER DOWN". 


167072 MOV #B1T0,aDPTS 
,1500 
aDPTS,R1 
#153776,R1 

024001 MP #240011 
es 


elelelelelele)e) 
per Pe Pe Pe Pe PP 
MOMNMONNNNNY 
a a end ath on et ent wna 

MAMAS 


NASSSNSS 
No 


1 
000001 167040 #B1TO,aDPTS 





SEQ 0055 
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001500 DELAY ,1500 
120000 167026 CMP #120000, aDPTS 
BEQ +4 
012214 ) HLT 


sNOW TEST THAT DATA CAN BE TRANSFERED. 
sA BINARY COUNT PATTERN WILL BE TRANSMITTED AND RECEIVED 
WITH OUT THE USE OF THE SOFTWARE CLOCK. 


012216 005037 001102 CLR TEMP1 
012222 001104 TEMP2 
012226 014032 PC,SEQ.DATA 
072232 
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zLINE.N SUBROUTINE TO FETCH THE L 


012252 


012254 
0122 


012442 


005722 


001076 
177570 
177570 


177570 
177570 
001165 
001146 
001134 


001146 


166726 


007134 


012454 
001260 


001232 


001164 


001256 


001134 


001164 


000004 


INE 
NUMBER AND FIRST DP11 VECTOR ADDRESS FROM 
: THE CONSOL SWITCHES 


;SWO-SW8=VECTOR ADDRESS OF FIRST DP11 


:SW9-SWIS=LINE NUMBER OF DP11 SELECTED FOR TEST 


LINE.N: CLR 
MOV 


ERRCNT 
SWR , SA\VSR1 


’ 


SWR , SAVSR2 


SWR ,RO 


R1 
SAVSR2+1,R1 
XTAG 


XLINEX,R1 

SAVSR1 

R1 

Ry 

R1,XLINEX 

R1 

R1 

R1 

@BASCSR 

SAVSR1 
+10 


#3$,a86 
BASCSR,R2 
1,R2 


2 
~ Tea 
R2, (R3)+ 
R2 
R2,(R3)+ 
(R2)+ 
Ro" (R3)+ 


#177000,R2 


SAVSR1 

2$ 

BASVEC ,R2 
R1,R2 


;CLEAR ERROR CCUNT 
SAVE CONSOL SWITCH SETTINGS 


SET SWR TO LINE NUMBER 
:LOW BYTE = FIRST DP VECTOR 
[HIGH BYTE = LINE NUMBER(S) 
SAVE CONSOL SWITCHES 


SAVE LINE NUMBER 


: CLEAR LSB 


SCALE LINE NUMBER TO ADDRESS 
: MODULO 10(8) 


DOES LINE 0 REALLY EXIST?? 


SET R2 = LINE 0 ADDRESS 
MANUFACTURE DEVICE ADDRESS 
3R3 = ADDRESS OF RCV STATUS ADRS 


;LOAD RCV STATUS ADRS 

: INC TO RCV BUFFER ADRS 

:LOAD RCV BUFFER ADRS 

>'NC TO SYNC BUFFER ADRS 
[LOAD SYNC ADRS 

: INC TO XMIT STATUS ADRS 

; LOAD agen gh dy STATUS ADRS 
‘INC TO XMIT BUFFER 

[LOAD XMIT BUFFER ADRS 


> INC TO SYNC EXTENTION 

sLOAD SYNC EXTENSION ADRS 

SET UP VECTOR ADDRESS 

CLEAR LINE NUMBER FROM VEC ADRS 


2SET y ba ADDRESS TO LINE NUMBER 
TOR ADRS 
ECTUR 


INC TO NEXT VECTOR 
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012444 010223 R2, (R3)+ ZLOAD XMIT VECTOR ADRS 
005722 (R2)+ ZINC TO NEXT VECTOR 

010213 “LOAD XMIT PRIORITY ADRS 

000414 BR uh 


001146 
000042 


012512 


LARA RKEHKK | RYE CRAKEAR 
sCLRVEC,ROUTINE TO FILL COMMUNICATION VECTOR AREA WITH .+2,HALT 


012514 00030 CLRVEC: MOV :R2 COMM VECTOR AREA ADRS 
MOV INIT R1 WITH ADRS OF HALT 
1$: af sMOV .+2 TO PC 
(R2) :MOV HALT TO PC 
: INC TO NEXT VECTOR AREA 
ew OF VECTOR AREA 


BN $ : 
012540 RETURN 


:BITSR,ROUTINE TO TEST READ WRITE BiTS OF STATUS 
;THIS ROUTINE VERIFIES THAT EACH READ/WRITE BIT 
CAN BE SET AND CLEARED 

[EXAMINE LOCATIONS 

:BITS: FOR BIT UNDER TEST 

REG: FOR REGISTER UNDER TEST 


012542 010537 BITST: RS, TEMP4 
MO (R5)+, BITS ZSAVE GIT NUMBER 
600330 BITS, aREG ‘SET BIT 
BITS.RO 
@REG,R1 
000312 BITS, aREG :1S BIT SET? 
+4 YES 


2 REPORT ERROR 
000300 BITS, @REG CLEAR BIT 

BITS,RO 

REG. RI 
000262 wt te @REG £33 ot CLEARED 

. +4 . 


M4 REPORT ERROR 
000250 BITS,@REG 3SET BIT 
0537 BITS.R® 
617701 0002 @REG,R1 





CZDP MACY11_30A(1052) 30-JAN=79 15:40 PAGE 60 


CHDPAC. P11 30-JAN-79 15:40 SEQ 0058 
2822 012650 033777 013106 000232 BIT BITS, @REG i1s BIT SET 
2823 012656 001001 BNE 24 sYES 
2624 012660 104002 HLT 2 [REPORT ERROR 
2325 012662 005077 000222 . CLR @REG ;CLEAR REG 
2826 012666 0V5S00C CLR RO 
2827 012670 017701 000214 MOV @REG,R1 
2828 012674 033777 013106 000206 BIT BITS, a@REG IS BIT CLEARED 
2829 012702 001401 BEQ +4 YES 
2830 012704 104002 HLT 2 “REPORT ERROR 
2831 012706 052777 000004 166316 BIS #B1T2,aDPRS KEEP CLOCK HUMMING 
2832 012714 052700 000004 BIS #B1T2,R0 
2833 012720 000205 RTS R5 
2834 
2835 
2836 
2837 ;VALID,ROUTINE TO TEST FOR ANY INTERACTION BETWEEN BITS 
2838 THIS ROUTINE CHECKS THAT WHEN EXECUTING A BIT SET INSTRUCTION 
444 ONLY THE SPECIFIED BIT IS SET 
2841 012722 011637 001110 VALID: MOV (SP), TEMP4 
2842 012726 017637 000000 013106 MCV a(SP) BITS FETCH BIT NUMBER 
2843 012734 062716 000002 ACD #2,(SP) 
2844 012740 053777 013106 000142 BI BITS, @REG SET BIT 
2845 012746 053700 013106 BIS BITS,RO 
2846 012752 017701 000132 MOV @REG,R1 
2847 012756 023777 013106 000124 CMP BITS, @REG WAS ONLY THAT BIT SEI? 
2848 012764 001401 BEQ +4 
2849 012766 104 HLT 2 REPORT ERROR 
2850 012770 043777 013106 000112 BIC BITS, @REG RESTORE REG 
2851 012776 053700 013106 BIS BITS,RO 
334 013002 000002 RTI ;RETURN 
te! ;CLEAR,ROUTINE TO TEST THAT BIC ONLY CLEARS SPECIFIED BIT 
2856 013004 011637 001110 .CLEAR: MOV (SP), TEMP4 
2857 013010 017637 000000 013106 MOV a(SP) ,BITS FETCH BIT NUMBER 
2858 013016 062716 000002 ADD #2, (SP) 
2859 013022 043777 013106 000060 BIC BITS, @REG CLEAR BIT 
2860 013030 043737 013106 001136 BIC BITS, TMPDAT CLEAR MASK 
2861 013036 012700 013000 MOV #13000,R0 
2862 013042 005300 DEC RO 
2863 013044 001376 BNE 72 
013046 013700 001136 MOV TMPDAT ,RO 
2865 013052 017701 000032 MOV @REG,R1 
013056 023777 901136 000024 CMP TMPDAT . REG WERE ANY OTHER BITS CLEARED 
2867 013064 001401 BEQ .+4 Z 
104002 HLT 2 REPORT ERROR 
2869 013070 053777 013106 000012 BIS BITS, @REG RESTORE REG 
2870 013076 053737 013106 001136 BIS BITS, TMPDAT RESTORE MASK 
tal 013104 RT]. 7RE TURN 
2873 013106 000000 BITS: 0 
sor 013110 000000 REG: 0 
2876 >; COMMON DATA AND IDLE SUBROUTINE 





CZDP 


CZDPAC .P11 
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79 


880 
2881 

882 
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013306 
015314 
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013370 
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015371 AND: = MOV #15371,R1 ;PRIME RANDOM # GEN 
072414 MOV #72414 ,R2 .. a a 
004036 MOV #4036 ,R3 38 os ‘a 
004300 166076 BIC #4300, aDPRS sRCV INT ENB, RCV ACTIVE 
160342 166076 BIC #160342 ,aDPTS INT ENBS IDLE SYNC, ERRORS 
015610 001172 MOV #BOTTOM,RP SET UP RCV POINTER 
001172 001170 MOV RP, TP 3SET UP_XMIT POINTER 
015224 166062 MOV #RRRR,ADPRIV ;RCV_INT VECTOR 
015076 166060 MOV #RRRT ,ADPTIV :XMIT INT VECTOR 
001162 MOV #2,SCNT :SYNC COUNT = 
001152 MOVB R2,TDATA ;RANDOM DATA 
1 166020 BIS #100, aDPRS sRCV_INT ENB 
001144 166022 1$: MOV TSYNC ,aDPTB ;LOAD BUFFER 
340 166012 BIS #340, aDPTS :XMIT DONE, INT ENB, STATUS ENB 
001166 MOV R1, TIME 3“'0N'' STALL 
001166 2$: 3 ou 30.6 SEC MAX 
000140 165772 BIC #140,aDPTS ;TURN OFF INT ENB 
050002 165764 Bi #B1T1,aDPTS sIDLE SYNC, 
013342 JSR R5,RNUM GENERATE ‘'STALL'* TIME 
1166 MOV R1,TIME sFETCH RANDON STALL TIME 
001166 3$: DEC TIME ;COUNT IDLE TI 
BNE 3$ 3 TIME QUT? 
013342 JSR R5,RNUM sGENERATE ‘‘ON’* TIME + SYNC 
000002 165734 BIC #81T1,aDPTS 3CLEAR IDLE 
N 
000100 165716 BIC #100,a@DPRS iCLEAR RCV INT ENB 
RTS PC 
;SGEN,ROUTINE TO GENERATE A UNIQUE SYNC CHARACTER 
000026 165712 SGEN: MOVB 4#26,aSYNC sSET UP FILLER SYNC 
005670 DELAY ,3000. :DELAY 10 CHAR 
013342 JSR R5,RNUM ;RANDOM # 
001144 MOVB = R1, TSYNC ZLOAD SYNC 
RTS PC 
7RNUM, PSEUDO RANDOM NUMBER GENERATOR 
040000 177570 RNUM: = BIT #B1T14,SWR ; TEST FOR SCOPE LOOP 
BNE 1$ sEXIT iF SCOPE 
ADD R2,R1 
ADC R1 
ADD R1,R2 
ADC R2 
ADD R3,R2 
ADC R2 
ADD R2,R3 
ADC R3 
1$: RTS RS 


Pics 





CZDP __ MACY11_30A(1052) _30=JAN-79 15:40 PAGE 62 
CZDPAC.P11  30=JAN=79 15:40 SEQ 6060 

2934 ;CLOCK,SUBROUTINE TO RUN SOFTWARE CLOCK 

2985 ;NUMBER OF CYCLES IS FETCHED CALL 

2937 013374 005037 001102 CLOCK: CLR TEMP? 

2938 013400 032737 000400 001134 BIT #818. SAVSRT 12/8 BITS/CHAR 

2939 013406 00141 BEQ RXCLK BRANCH IF 8 BITS/CHAR 

2940 013410 052777 002000 165614 BIS  #B1T10, aDPRS SELECT 12 BIT MODE 

2941 013416 052737 000400 001160 BIS  - #BIT8, LIMIT :9 BIT 

2942 013524 062737 000004 001102 ADD =. #4, TEMP 1 SINCREASE CLOCK COUNT 

2943 013432 +6 

2944 013434 005037 001102 RXCLK: CLR — TEMP 

2945 013440 005037 177776 CLR = PS 

2946 013444 067637 000000 001102 ADD = a SP), TEMP1 

2947 913452 062716 000002 ADD —- #2, (SP, 

2948 013456 052777 000010 165554 1$ BIS  #BIT3, aDPTS ;SET CLOCK HIGH 

2949 013464 013705 013522 MOV —s- FREQ, RS SET UP DELAY COUNT 

2950 013470 DEL= 

2951 013470 005305 DEC — RS ;DECREMENT COUNT 

2952 013472 001376 BNE DEL “BRANCH IF NO TIMEOUT 

2953 013474 042777 000010 165536 BIC #BIT3, aDPTS SET CLOCK LOW 

2954 013502 013705 013522 MOV —- FREQ, R5 SET UP DELAY COUNT 

2955 13506 DEL=. 

2956 013506 005305 DEC — RS ;DEC COUNT 

2957 013510 001376 BNE —DEL ZBRANCH IF NO TIMEOUT 

2958 013512 005337 001102 DEC TEMP 

2959 013516 001357 BNE 1$ 

2960 013520 000002 RTI 

2961 013522 000030 FREQ: 30 ;NORMAL 12.8 US DELAY 

2962 :PATCH FOR 50 FT CABEL 

2963 

2964 

2965 sREE, SUBROUTINE TO REINITIALIZE DP11 FOR NEXT TEST 

$967 013524 012737 000200 177776 REE: MOV _—«- #200, PS SET PRIORITY TO 4 

2968 013532 005077 165502 CLR —s aD PTS CLEAR XMIT STATUS 

2969 013536 005077 165470 CLR — @DPRS CLEAR RCV STATUS 

2970 013542 105077 165476 CLRB = ASEXT CLEAR SYNC EXTENTION 

2971 013546 012737 1 001144 MOV «#1, TSYNC INIT TEST SYNC 

2972 013554 012777 014536 165464 MOV  —« #FRINT ,aDPRIV SET UP RVI INT VECTOR 

2973 013562 012777 014542 165462 MOV = #TV18 DPT IV SET AMT INT VECTOR TO. SYNC 

2974 013570 032737 000400 007134 BIT  #BIT8. SAVSR1 :TEST FOR 8/12 BITS/CHAR 

2875 013576 001405 BEQStséd1S EXIT IF 8 BITS 

2976 013600 062705 000010 ADD —s- #10, RS SET RETURN ADRS FOR 12 BIT LIMIT 

2977 013604 052777 002000 165420 BIS _ #B1T10, aDPRS SET 12 BIT/CHAR MODE 

2978 013612 00020 1$: RTS) RS [RETURN 

f 

598) COMMON DATA AND IDLE SUBROUTINE 

2982 013614 042777 004300 165410 A2ND: BIC #4300, aDPRS RCV INT ENB, RCV ACTIVE 

2983 013622 042777 160342 165410 BIC #160342, aDPrs INT ENBS IDLE SYNC, ERRORS 

2984 013630 012737 015610 001172 MOV - #BOTTOM-RP RP = BOTTOM OF TUMBLE TABLE 

2985 013636 013737 001172 001170 MOV —s RP, TP SET UP TRANSMIT POINTER 
013644 012777 015224 165374 MOV —s #RRRR aDPRIV :RCV_INT VECTOR 

2987 013652 612777 015076 165372 MOV —s- #RRRT aDPTIV :XMIT INT VECTOR 

2988 013660 012737 001162 MCV —s- #2, SCNT [SYNC COUNT = 2 

2989 013666 110237 001152 MOVB = R2. IDATA RANDOM DATA 
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013770 
013774 


013776 
004 


014026 


014032 


014 
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30-JAN~ 
013777 


9 ec 
5:40 
001144 165342 
000100 165324 
900140 165324 
001166 
001166 
000140 165500 
2 165272 
013342 
001766 
001166 
013342 
014006 000024 
001050 
013776 000024 
165026 
001174 
165202 
001154 
001152 
165154 
165156 
000001 165142 
000400 001156 
000400 001134 
010000 001160 
002000 165110 
000426 001144 
165110 
001160 
000026 001144 
014542 165072 
014650 165060 
000200 177776 
000004 001162 
001144 165026 
000100 165014 


15:49 PAGE 63 


MOV TSYNC ,@DPTB 
BIS #100, aDPRS 
BIS #140, aDPTS 
MOV R1,TIME 

1$ war 
DEC TIME 
BNE 1$ 


BIC #140, aDPTS 
BIS #81T1,aDPTS 
R5,RNUM 


MOV R1,TIME 
2s: at 
DEC TIME 
2s 
JSR R5,RNUM 
PC 


sPOWER FAIL ROUTINE 


.PFAIL: MOV #PWRUP, 24 
HALT 
PWRUP: RESET 
MOV #STACK, SF 
MOV #.PFAIL,26 
TYPE 
MPOWER 
JMP @RE TURN 
SEQ.DATA 
V (SP) ,BACK 
CLRB = @SEXT 
CLR RDATA 
CLR TDATA 
CLR @DPRS 
CLR aDPTS 
BIS #B1T0, aDPRS 
MOV #400, CHLEN 
BIT #B1T8,SAVSR1 
BEQ 1$ 
MOV #10000,LIMIT 
BIS #81110. aDPRS 
MOV #426, TSYNC 
INCB — aSEXT 
BR 2$ 
1$: MOV #400,LIMIT 
MOV #26, TSYNC 
2$: MOV #TV18,aDP7IV 


MOV #RV18,aDPRIV 
#200,PS 
MOV #4 SCNT 


MOVB TSYNC ,a@SYNC 
BIS #81T6,aDPRS 


LOAD BUFFER 

:RCV_INT_ ENB 

:XMIT, INT ENB 
"ON" STALL 


30.6 SEC AVERAGE 
3 TURN Soeet INT ENB 


- IDLE SYh 
: GENERATE. “STALL'’ TIME 


sCOUNT IDLE TIME 
TIME OUT? 
GENERATE ‘'ON’* TIME + SYNC 


;LOAD PFAIL VECTOR FOR POWER UP 


:wAIT TTY TO COME UP 
SREINIT STACK POINTER 
sLOAD PFAIL VECTOR FOR POWER DOWN 


: CLEAR Age Deas 
RECEIVER 

TRANSMITTER. DATA 
RECEIVER STATUS 

: TRANSMITTER STATUS 

; STRIP SY * 

CHAR LENGTH INDEX 
:TEST 12 BIT CHAR MODE 


:NO 

SELECT END OF DATA 

ieee 12 oi} oa 
7SYNC FOR 12 BIT CHAR 

‘PLACE Moe OF eSYNE IN SYNC EXT 


; TEMPORARY CHARACTER LIMIT 
ZINIT SYNC STORAGE 

; TRANSMITTER VECTOR 
RECEIVER eres 


:RCV INT ENB 


SEQ 0061 


CZDP MACY11 nape 30-JAN=79 15:40 PAGE 64 


CODPAC. P11 30-JAN-79 15:40 SEQ 0062 
3046 014216 032737 000001 001134 BIT rs | SAVSR1 
3047 014224 001004 BNE 
3048 014226 052777 000340 165004 BIS 1300, aDPTS STATUS INT ENB 
3049 014234 000403 BR +10 
3050 014236 052777 000301 164774 BIS #301, aDPTS 
305? : TRANS INT ENB 
3052 ; TRANS DONE 
3053 014244 032737 000001 001134 BIT #B1T0,SAVSR1 
3054 014252 001017 BNE 5$ 
3055 014254 022737 000001 013522 CMP #1,FREQ TEST FOR HIGH SPEED 
3056 014262 001010 BNE 4$ ;BRANCH IF NOT HIGH SPEED 
3057 014264 052777 C00010 164746 3$: BIS #81T3,aDPTS SET CLOCK HIGH 
3058 014272 042777 000010 164740 BIC #81T3,aDPTS SSET CLOCK LOW 
3059 014300 000771 BR 3$ 
met 014302 HALT 
3062 014304 104402 4$: RXCLK RUN SLOW CLOCK 
3063 014306 000001 1 
3064 014310 000775 BR 4$ 
3065 014312 005237 001102 5$: INC TEMP1 
3066 014316 001375 BNE 5$ 
3067 014320 005337 001104 DEC TEMP2 
3068 014324 001372 BNE 5$ 
3069 014326 104000 HLT 
a 014330 000207 6$: RTS PC 
3072 014332 017637 000000 001106 -DELAY: MOV a(SP) , TEMPS SET UP COUNT 
3073 014340 062716 000002 ADD #2, (SP) 
3074 014344 011637 001110 MOV (SP), TEMP4 
3075 014350 022626 POP. SP 
3076 014352 005037 177776 CLR PS 
3077 014356 162737 001106 SUB (PC) +, TEMPS ~ A SMALLER DELAY TIME 
3078 014362 LESS. TIME: T A NUMBER IN HERE TO BE 
3079 014362 000000 0v0 ‘SUBTRACTED FROM bg F 
3080 014364 062737 001106 ADD (PC) +, TEMP3 FOR A LONGER DELAY TIME 
3081 014370 MORE . TIME : ;PUT_& NUMBER IN HERE TO BE ADDED 
3082 014370 000000 000 :TO THE TOTAL TIME. 
3083 014372 DEL=. 
3084 014372 162737 000001 001106 SUB #1, TEMPS 2 TIME OUT 
3085 014400 001374 BNE DEL :NO 
3086 014402 000177 164502 JMP aTEMP4 


CZDP 


MACY11 epee 


CZDPAC .P11 


3087 


WWWNWWNWWNNWNNWW 
ed et ed = od 
NS whanuvaoe 
SODNAUSWN—O 


3135 


WWNWWAWWANWWw 
— od 3 ow 
BREW 

D=OOWYS 


014406 
014414 
014416 
014420 


014470 
014472 


014510 


014512 
014520 
014522 


014524 
014530 


014532 
014534 


014536 
014540 


014542 
014550 


30-JAN-79 


032777 
001001 


032777 
ribbed 


04000 
022626 
000137 


032777 


032777 
001401 
104000 


013716 
000002 


“err 
5:40 


020000 


020000 
020000 


140200 


011754 


100000 


100000 
100000 


060200 


001174 


001144 
001145 


164472 
164466 


15:40 PAGE 05 


SEQ 0063 
; INTERRUPT SERVICE ROUTINES 
[THESE ROUTINES MAY FUNCTION AS 
<1. ERROR TRAPS FOR FALSE INTERRUPTS 
; 2. POINTERS BACK TO THE MAIN LINE FOR VALID INTERRUPTS ¢ 
: 3. FUNCTIONAL TEST WHICH ARE INTERRUPT DRIVEN 
;VERIFY THAT INTERRUPT RESULTED FROM RING. 
Tv24: BIT #B1T13,aDPTS TEST FOR RING 
SNE 1$ SBRANCH IF SET. 
HLT SREPORT ERROR 
1$: BIC #B1T13,aDPTS | ;CLEAR RING FLAG. 
BIT #B1T13,aDPTS :TEST IT 
BEQ 2$ [BRANCH IF CLEAR. 
HLT SREPORT ERROR 
2$: eI #140200, apPTS ZNO OTHER STATUS FLAG ON? 
HLT :REPORT ERROR 
3$: POP. SP 
JMP RCD1 
:VERIFY THAT INTERRUPT RESULTED FROM 'C4RRIER vOWN' FLAG 
Tv25: BIT #BIT15,aDPTS ;TEST FOR ‘CARRIER DOWN’ FLAG 
BNE 1$ [BRANCH IF SET 
HLT ‘REPORT ERROR 
1$: BIC #B1T15,aDPTS CLEAR "CARRIER DOWN’ FLAG. 
BIT #B1T15.aDPTS =: TEST IT 
BEQ 2$ [BRANCH IF CLEAR. 
HLT “REPORT ERROR 
2s: BIT #060200 ,aDPTS :NO OTHER FLAGS ON? 
HLT :REPORT ERROR 
3$: MOV BACK, (SP) 
RTI 
FTINT: HLT 5 ZERROR ROUTINE SHOULD RETURN TO MAINLINE 
FRINT: HLT 6 ZERROR ROUTINE SHOULD RETURN TO MAINLINE 


T¥18: MOV TSYNC ,aDPTB :XMIT SYNC 
MOVB TSYNC+1,@SEXT  ;LOAD SYNC EXT 


CZDP MACY11 wae —- 15:40 PAGE 66 
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014556 005337 001162 DEC SCNT sHAVE 2 SYNC'S BEEN XMITED 
014562 001 BNE ; 


$ : 
014564 012777 014574 MOV #TV19,aDPTIV YES CHANGE VECTOR 
014572 000002 1$: RTI 


; SEQUENTIAL DATA TRANSMITTION ROUTINE 


014574 032777 TVi9: #140000,aDPTS ;ANY STATUS ERRORS 
1401 BE +4 NO 


REPORT ERROR 
— oo READY 
-+ Ps 

sREPORT ERROR 
TDATA, aDPTB ;LOAD BUFFER 
TDATA NEXT CHARACTER 
LIMIT, TDATA HAVE ALL CHARACTERS 


zNO 
- #140, aDPTS :YES, CLEAR INTERRUPTS 


RECEIVE SEQUENTIAL DATA 
RV18: @DPRS sRECEVIER DONE ?? 
BM +4 


;YES 
[REPORT ERROR 
RDATA,RO 
@DPRB,R1 
164336 MP  ‘iiattaataa CORRECT DATA 


001136 @DPRB, TMPDAT STORE DATA 
1 REPORT ERROR 
164314 : #B1T0,aDPRS CLEAR STRIP SYNC 
RDATA NEXT CHARACTER 
001154 LIMIT. ~RDATA 
RDATA 


TDATA 

LIM ;DECREASE LIMIT TO 7 BITS 
164276 STVI8, @DPTIV. :SET UP SYNC TRANSMITTION 

#4, SCNT 7SYNC COUNT =4 

#B1T0,aDPRS :STRIP SYNC 

#BIT11,aDPRS | :CLEAR RCV ACTIVE 

#BITO,SAVSR1 


+1 
gees : INT ENB + DONE 


a 

#301, aDPTS 

CHLEN, aDPRS :CHANGE CHAR LENGTH 

#400, CHLEN [DECREASE CHAR LENGTH 

#1400, CHLEN HAVE ALL LENGTHS BEEN TESTED 


:NO 
aDPTS CLR TRANSMITTER STATUS 
ares [CLR TECEIVER STATUS 


WIWNININANWWANINWNWW 
ee ee a ed ed ee ed ed ad dd 
BLKGRAVLSSELE 
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3199 015066 012706 9) 050 MOV #STACK, SP 
015072 000177 JMP @BACK 
SYNC ROUTINE FOR RANDOM DATA TEST 


SS 


Ww 


_g SYNC ROUTINE FOR RANDOM DATA TEST 


tga 


105777 sume “"TsTB — aDPTS sREADY 
Seo t 


+4 ;YES 
ap [REPORT ERROR 
164126 MOV TSYNC ,@DPTB 3 TRANSMIT SYNC 
SCNT 72 SYNC'S 


1$ : 
164122 #RRT1,@DPTIV YES, SET UP DATA TRANSMIT VECTOR 
164102 . #160000,aDPTS CLEAR ERROR BITS 


3 


ee ;RRRT, RANDOM DATA, SYNC, RANDOM STALL 
es 8 STRANSMITTER SERVICE ROUTINE 


e: 
RRT1: 


OREN 
WONOULWN—O 


aDPTS — TTER READY 


+4 

[REPORT ERROR 
RS ,RNUM GENERATE NEXT CHARACTER 
R1,TDATA 


001152 CHLEN, TDATA sREDUCE DATA TO # BITS/CHAR 
164046 TDATA, aDPTB : TRANSMIT CHARACTER 
TP,R4 SET UP TRANSMITTER POINTER 
TDATA, (R4)+ :MOV CHARACTER TO TUMBLE TABLE 
+ Salil END OF TUMBILE TABLE 


#BOTTOM,R4 
1$: MOV R4,1P SAVE TRANSMITTER POINTER 


RTI 
sRRRR, RANDOM DATA, RANDOM SYNC, RANDOM STALL, RECEIVER SERVICE 
RRRR: (SP), TEMPS 
001154 MO @DPRB,RDATA SAVE RECEIVED DATA 
RP ,R2 SET UP RECEIVER POINTER 
RDATA,R1 


(R2) ,RO 
RDATA, (R2)+ 233 DATA CORRECT 


001144 or ahi IF NOT DATA IS IT SYNC 
e* . 
FREPORT ERROR 
~(R2) ;ADJUST TUMBLE TABLE 
oto Me ;TOP OF TUMBLE TABLE 


2 
#BOTTOM,R2 


[YES RAP 
: R2,RP SAVE REC 
163714 #B1T0,aDPRS CLEAR ST 


AROUND 
IP VER POINTER 


E 
RIP SYNC 
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i TRANSMITTER SERVICE ROUTINES FOR PARITY TEST 


015320 TPRTY: 
013777 163714 MOV TSYNC ,aDPTB :XMIT SYNC CHARACTER 
SCNT DEC SYNC COUNT 
1$ BRANCH IF LESS THAN 2 SYNCS 
163710 MOV #2$,aDPTIV [SET VECTOR TO TRANSMIT DATA 
: RETURN TO MAINLINE 


032777 163666 : #1 — aDPTS ; ~—¥ ERRORS 
o + > 


001401 ; 

104000 REPORT ERROR 

013777 163656 TDATA, @DPTB ; TRANSMIT DATA 

005237 TDATA : INC TRANSMIT DAT 

023737 001160 TDATA,LIMIT 71S “eo F sata REACHED 
001401 3$ iYES, 
000002 zNO, RETURN TO MAINLINE 
Beans 3$: aDPTS SCLEAR STATUS REGISTER 


RECEIVER SERVICE ROUTINE FOR PARITY TEST 
000000 HERE=0 


017727 000000 RPRTY: @DPRS , AHERE SAVE RCV STATUS HERE 
001136 MO @DPRB, TMPDAT SAVE RCV DATA 


001154 TMPDAT -RDATA : CHECK FOR rong DATA 
+4 BRANCH IF DATA OK 
1 REPORT ERROR 
015414 B! #BIT12,RPRTY+4 ;TEST PARITY 
015454 : +4 ; (RPRT1)=BEQ .+4 FOR EVEN PARITY 
; (RPRT1)=BNE .+4 FOR ODD PARITY 
015456 [REPORT ERROR 
7 EXAMIN AMHERE Ay STATUS 
hn ng FOR DATA 
PRT1 FOR ODD/EVEN 
RDATA INC TO NEXT EXPECTED DATA 
TEMP2 :PARI TY FLAG 
#16. , TEMPS yrs COUNT TO 16. 


RPRT2: 


:BRAN BIT Js 
COM SET FLAG TO A ‘I'* FOR ODD PARITY 
RPRT3: DEC ROTATE COUNT 
BN :BRANCH IF 16 BIT WORD NOT CHECKED 


: IF FLAG=1 EXPECTED DATA SHOULD CAUSE ODD PARITY 
BIT 12="1"" 


001154 ROL RDATA RESTORE EXPECTED DATA 
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oo 
ab ad 


Qooo0c00o 

a3 YS YY I 
PASASIAVIIT 
Rare aaa a 


g 


015622 
015626 
01 
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105777 


001104 
000400 
000400 
000001 
001160 


163436 
000040 
000002 


000040 
163302 


30-JAN-79 


015454 


015454 
163454 
001154 


177776 


163364 


177776 
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TST TEMP2 TEST FOR NEXT PARITY 
BM! RPRT4 ;BRANCH FOR ODD or 
BIS —— EVEN PARITY=BEC . 


BR R 
RPRT4: BIC #81T8,RPRT1 ODD PARITY=BNE . 
RPRTS: BIC #B81T0,aDPRS CLEAR SYNC STRIP 
CMP LIMIT,RDATA END OF DATA 


BEQ RPRT6 sYES 
RTI NO 
RPRT6: CLR @DPRS ;CLEAR STATUS 
BIC #BITS,PS sLOWER PRIORITY 
a4 #2, (SP) 
BOTTOM: 8 ;BOTTOM OF TUMBLE TABLE 
0 
0 
TOP: 0 


; INTERRUPT SERVICE ROUTINES FOR DB25S TESTS 


: THESE ROUTINES MAY FUNCTION AS: 
: 1. ERROR TRAPS FOR FALSE INTERRUPTS 
; 2. POINTERS BACK TO THE MAIN LINE FOR VALID INTERRUPTS 
: 3. FUNCTIONAL TEST WHICH ARE INTERRUPT DRIVEN 


SRVS: TSTB aDPRS sRCV DONE 
8M! +4 
HLT Z;REPORT ERROR 


MOV TSYNC ,RO 

MOV @DPRB,R1 

CMPB si > eect _ SYNC CHARACTER 
o* ; 


HLT 1 REPORT ERROR 

POP. SP sADJUST STACK 

POP. SP sADJUST STACK FOR CLOCK SUB 
BIC #BITS,PS sLOWER PRIORITY 

JMP @BACK 


; IMP 
BACK TO MAINLINE 


SEQ 0067 
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Ot 2676 032737 040000 177570 


163140 
163134 
177570 


001066 


001100 


177570 
001060 


001336 
001326 


002 


032737 
001402 


001000 177570 


15:40 PAGE 70 


RESTRT: 


SCOPE LOOP AND INTERATION HANDLE 
#B1T14,SWR 
1$ 


3$ 

@TKCSR 
@TKDBR ,RO 
#SW11,SWR 
2$ 


LPCNT 
LPCNT, ICOUNT 
3$ 


RETURN, (SP) 


sEND OF PASS 

: TYPE ‘END OF PASS CSR: 
UPDATE PASS COUNT 
UPDATE LINE NUMBER 

IF IN CYCLE MODE 
RESTART TEST 


LSTERR 


AXXXXXX"* 


R 


:CLEAR LAST ERROR PC 


CLEAR ERROR FLAG 
UPDATE PASS COUNT 


SAVSR1 
+6 


XL INEX 
PASCNT , |. IGHTS 
#PART1,RETURN 
#STACK, SP 
SAVSR1 

+6 

PART1 

BGNO 

6.2 


CHECK FOR FREEZE ON CURRENT DATA 


: BIT #SWO9, SWR 
BEQ 1$ 


:DISPLAY PASS COUNT 





C 
CZ 


8 


A 


¥ ¥ 


ajo YS Ss SS 


WOONAUSFWN-O 


Ryocceoeees 


Nm 
—_ 


3422 


MACY11 
-P11 


016114 
016120 


016122 


30A(10 


013716 
000002 


001406 
105777 
100003 


001064 


000000 
000002 
010000 


162702 
162676 


010000 
162654 


000207 
020000 
601109 
001100 
001200 


000002 


177001 
017352 
016362 
016374 
016406 
001200 


016406 


177570 


177570 


162646 
177570 
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MOV LOCK, (SP) 
RTI 


1$: 
; TELETYPE OUTPUT ROUTINE 
.TYPE: MOV a(SP) RS 
ADD #2, (SP) 
1$: BIT #SW12,SWR 
BNE 3$ 
TSTB — (R5) 
BEQ 3$ 
2$: TSTB = aTPCSR 
BPL 2$ 
MOVB _—(R5)+, @TPDBR 
BR 1$ 
3$: RTI 
ZERROR HANDLER 
-HLT: BIT #SW12, SwR 
BEQ KBX 
TSTB  aTPCSR 
BPL XBX 
MOVB  #207,aTPDBR 
XBX: BIT #SW13,SWR 
BNE HALTS 
CMP (SP) ,LSTERR 
BEQ 1$ 
MOV (SP) ,LSTERR 
LRB  —s ERRFLG 
1$: SAVO5 
MOV (SP) RS 
SUB #2,R5 
MOV (R5) ,R4 
ASL RG 
ADD (R5) RS 
ASL R4 
BIC #177001.R4 
ADD # .ERRTAB,R4 
MOV (R4) +, ERRMSG 
MOV (R4) +, DATAHD 
MOV (R4) ,DATABP 
TSTB —ERRFLG 
BEQ TYPMSG 
TST DAT 
BNE TYPDAT 
TYPMSG: TYPE 
MTSTN 
CNVRT 
XTSTN 
TYPE 
ML INE 
CNVRT 
Z7LINE 
TYPE 


MERRPC 


SEQ 0069 
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177777 


016374 


01€406 


177570 
000002 
001076 
000001 


000400 
002000 


001062 
0° 1050 
162354 


002 
002 


002 


000000 
017454 
000002 


04 
016576 016724 


001200 


001134 
177570 
177570 
001060 


15:40 PAGE 72 


#-1 ,ERRFiG 


ERRMSG: 0 


DATAHD 
TYPDAT 


DATAHD: 0 


TYPDAT: 


DATABP 
RESREG 


DATABP: 0 


RESREG: 
TST 


HALTS: 


EXITER: 


SWR 
EXITER 


2(SP) ,RO 


ERRCNT 
eat 
#Sw08 , SWR 
#SW10,SWR 
2$ 
NEXT ,RE TURN 


#STACK, SP 
@RE TURN 


6.2 


3,2 


XL INEX 
; CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


a(SP),R1 
TEMP, TEMP3 
#2, (SP) 
(R1)+,WRDCNT 


@(R1)+,BINWRD 
BINWRD.R4 
CHRCNT .RS 
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CZDPAC P11 30-JAN-79 15:40 SEQ 0071 
3522 016602 012700 017454 MOV aTEMP RO 
3523 016606 010403 3$: MOV RGR 
3524 016610 04¢763 177770 BIC #177770,R3 
3525 016614 062703 000260 ADD #260,R3 
3°26 016620 110320 MOVB R$, (RO) + 
3527 016622 000241 CLC 
3528 016624 006004 ROR RS 
3529 016626 000241 CLC 
3530 016630 006004 ROR R4 
3531 016632 000241 CLC 
3532 016634 006004 ROR RG 
3533 016636 005305 DEC RS 
3534 016640 001362 BNE 3$ 
3535 016642 012703 017516 MOV #MDATA,R3 
3536 016646 114023 4$: MOVB  =(RO),(R3)+ 
3537 016650 105337 016724 DECB = CHRCNT 
3538 016654 001374 BNE 4$ 
3539 016656 105737 016725 TSTB —« SPACNT 
3540 016662 001405 BEOQ 6$ 
3541 016664 112723 000240 5$: MOVE #240, (R3)+ 

542 016670 105337 016725 DECB = SPACNT 
3543 016674 001373 BNE 5$ 

3544 016676 105013 6$: CLRB (R3) 
3545 016700 104407 TYPE 

3546 016702 017516 MDATA 

3547 016704 005337 016722 DEC WRDCNI 
3548 016710 001322 BNE 1$ 

3549 016712 013737 001106 017454 MOV TEMP3, TEMP 
3550 016720 000002 RT 

3551 016722 000000 WRDCNT: C 

3552 916724 000000 CHRCNT: 0 

3553 016725 SPACNT=CHRCNT +1 

3354 016726 000000 BINWRD: 0 

$209 sSAVE PC OF TEST THAT FAILED AND RO=-R5 
3558 016730 016637 000004 001132 .SAVOS: MOV 4(SP), SAVPC 
3560 ZSAVE RO-RS 

3562 016736 010537 001126 Sv05: MOV RS, SAVRS 
3563 016742 010437 001124 MOV RG. SAVRS 
3564 016746 010337 001i22 MOV R3,SAVR3 
3565 016752 010237 001120 MOV R2,SAVR2 
3566 016756 017137 001116 MOV R1,SAVR1 
3567 016762 072037 001114 MOV 20, SAVRO 
3568 016766 2 RT] 

3569 

3570 ZRESTORE RO-R5 
3572 016770 013700 001114 -RESOS: MOV SAVRO,RO 
3573 016774 013701 001116 MOV SAVR1.R1 
3574 017009 013702 001120 MOV SAVR2.Re 
3575 017004 015703 001122 MOV SAVR3_R3 
3576 017010 C13704 001124 MOV SAVRG RG 
3577 017014 013705 001126 MOV SAVRS._RS 


MACY11_30A(10 
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SEQ 0072 
000002 

3579 017022 005015 055103 MTITLE: .ASCIZ <15><12>/(ZDPAC DP11A SYNC MUDEM INTERFACE DIAG/ 

3580 01 020040 

MPOWER: .ASCIZ <15><12>/PWR FAILED/ 


MEPASS: .ASCIZ <7><7><15><12>/END PASS CSR: / 


Ww 
vw 
Co 
uw 
wn 
—s 
— 
S2 t=) 
NN 
= 
o— SNSSs VRS 
[NM ANNWOANWES 


1 
1 

11 006407 4 

16 116 950040 5 

24 020123 051503 035122 

32 00004 

33 005015 0462524 ett MTSTN: .ASCIZ <15><12>/TEST NO. / 

2 eae? 042516 020072 MLINE: .ASCIZ /LINE: / 

+4 015 050012 035103 MERRPC: .ASCIZ <15><12>/PC: / 

66 

71 


000040 
005015 000 MCRLF: .ASCIZ <15><12> 


042412 052116 EM? eASCIZ <15><12>/ENTERED FROM / 
042795 


000040 
017212 #443 051124 047101 EM2: eASCIZ <15><12>/TRANSMITTER / 
) 000040 
017232 005015 042522 042503 EM3: -ASCIZ <15><12>/RECEIVER / 


7 017240 wr 051105 020040 
050130 041505 DHO: -ASCIZ /EXPECTED RECEIVED / 


Oo 
as 
N 
N 
* 
N 
oS 


000 
017275 106 044501 042514 DH1: eASCIZ /FAILED TO INTERUPT. / 
017300 020104 047524 044440 
050125 
017320 047111 Besa 052522 DH2: eASCIZ /iNTERUPTED UNEXPESTEDLY./ 


SSESTESTES 


RRRRD 
—"SOOONAUSWN Oo 
oO 
= 
N 
iW 
& 
So 
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AND 013112 2034 2041 2050 28784 

A2ND 013614 2434 2442 2450 29824 re 

BACK 001174 9708 =3991* 2064" 2230* 2295* 2354*% 2632% 3023* 3127 3200 3352 

SASCSR 001260 10 2737 2742 

BASVEC 001256 10324 

BEGINI 001262 971 10374 

BEGIN2 007234 915 21624 

001326 1043 10474 3401 

BGNOA 007276 2167 21734 

BINWRD 016726 3519* 3520 35544 

BITS 0131 2806* 2807 2808 2810 2813 2814 2816 2819 2820 2822 2828 2842* 2844 
2845 2847 2850 2851 2857* 2859 2860 2869 2870 28734 

BITST 012542 1094 1696 1098 1100 1104 1106 1108 1131 1134 1137 1139 1141 
1143 1145 1147 1149 28054 

BITO = 900001 6204 1095 1132 1307 1338 1377 1419 1488 2175 2196 2593 2595 2607 
aH $59 2634 2661 2689 2696 3029 3046 3053 3175 3184 3186 3253 

Bli1_ = 2 6194 1097 1135 1399 1340 1379 1489 1927 1957 2154 2896 2902 2999 

BIT10 = 002000 6104 1109 1321 1391 1441 1445 1447 1966 1968 2001 2080 2105 2483 
2494 2524 2536 2567 2940 2977 3034 

BIT11 = 004000 6094 1781 1804 1808 1809 1855 1866 1880 1953 1954 2040 2048 2130 


2247 2252 2257 2264 2309 2374 2319 2326 2358 2372 2377 2382 2390 


BIT12 = 010000 6084 1180 1476 2486 2497 2527 2539 2559 2570 3290 

BIT13 = 020000 6074 1146 1350 1449 1513 1514 1544 1548 2601 3098 3102 3103 

BIT14 = 040000 6064 1150 1352 1451 1479 1515 1516 1552 1556 1814 1882 2126 2266 
2329 2392 2920 3357 

BIT?5 = 100000 x iy Ae 1354 1453 1482 1517 1518 1560 1564 2615 2618 2637 3114 

BIT2 = 000004 6184 1073 1075 1099 1133 1136 1177 1209 1225 1251 1311 1381 1408 
1440 1444 147 1490 1602 1631 1660 1772 1798 1919 2107 2831 2832 

BIT3 = 000010 6174 1138 1342 1435 1491 2948 2953 3C57 3058 

81T4 = 000020 6164 1492 

BITS = 0 6154 1140 1344 1437 1475 1478 1481 1543 1551 1559 1813 1879 1958 
2122 2132 2476 2517 2552 2626 3321 3351 

BIT6 = 000100 6144 1101 1142 1313 1346 1383 1439 1487 1494 1607 1637 1666 1789 
1803 1862 1881 1928 2012 2238 2265 2301 2327 2357 2363 3045 

BIT? = 000200 6134 1103 1144 1315 1348 1385 1443 158" 2109 

BIT8 = 000400 612% 1105 1317 1387 1635 1723 1837 1964 1998 2039 2046 2077 2103 
2292 2440 2447 2516 2938 2941 2974 3031 3313 3315 

BIT9 = 001000 6114 1107 1319 1389 1414 1664 2047 2242 2304 2353 2367 2448 2480 
491 2521 2533 2551 2556 564 

BOTTOM 015610 2883 2984 3233 3251 33244 

C 114 9574 1771* 1820 1822* 823 1846* 1891 1892* 1893 1894 

BRW 015776 33754 

BRX 16 33764 

CABLE 001150 9604 1038* 1049 2163* 2194 

CHLEN 001156 1997" 2031* 2038* 2045* 2428% 2439% 2446" 3030* 3191 3192* 3193 3227 

CHRCNT 016724 3517* 3521 3537* 35524 3553 

CLEAR = 104404 1376 1378 1380 1382 1384 1386 1388 1390 1418 1434 1436 1438 
1442 1448 1450 1452 

CLOCK = 104401 9904 2209 2234 2245 2250 2261 2297 2307 2312 2323 2360 2370 2375 
2386 2472 2478 2489 2519 2531 2554 2562 

CLRVEC 012514 1044 1047 2168 2173 27874 

CNVRT = 104413 10104 3390 3458 3462 2456 


CONVRT= 104412 1008" 3479 


K 6 
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DATABP 016406 3451* 3454 3477 34804 

DATAHD 016374 3450* 3473 34764 

DEL = 014372 2950 2952 29554 2957 30834 3085 

DELAY = 104403 9944 1611 1641 1670 1775 1790 1848 1869 1922 1930 2108 2123 2155 
2594 2608 2627 2635 2690 2697 2911 

017247 36094 3629 3633 
DH1 017273 134 3637 3641 
DH2 017320 36174 3 3649 
34 10208 1793 1872 1933 3170 3171 3173 3239 32 3345 3346 

DPRiv 001246 10284 1069* 1473* 1512* 1774% 1785 1847* 861* 923* 2008*  2083* 2150* 206% 
2260* 2294% 2322 2385" 24675* 2515* 2550" 2885* 2972  2486*  3041* 

DPRP 001250 1029# 1070* 2207* 

DPRS 001232 10194 1067* 1073* 1075 1¢93 1133* 1136* 1177" 1178* 1179 1200* 1225* 1226* 
1229 1251* 1305 1373 1575* 1408* 14408 14448 1446" 1474% 1580* 1602* 1631* 
1635* 1644" 1660* 1664* 1673% 1694% 1768 1772* 1781 1789* = 1798* 1 1803* 
1804 1808* 1809 1820* 1841* 1862* 1866 1880* 1881* 1891* 1893" 19168 1917 
1919* 1928* 1950 1953* 1954 1968* 1979s 996* 2001* 2012* 2039*% 2040+ 
2046* 2067* 2048% 2065* 2075* 2080* 2084* 2105* 2107* 21308 2149% 2204+ 2238 
2247 2257 2264* 2292% 2301* 230 2319 2326* 2353* 2358s 363* 2372 e 
2390* = 2426* = 2.440% 441% = 2447% = — 2.448% = 2449% = 2471% = 235138 = 216% «= 2548 «= 551% 39 2623 
2665* 2744 2831* 2881* 2889*  2904% 2940% 2969%  2977% 2982s 1* 3027* * 
rg 3045* 3175* 31842 3185* 3191% 21978 3253« 83 3316* 3320* 3341 

DPTB 001242 10234 1585*  1606* 1636* 1665* 1778* 1784* 1788* 1852* 1858*  1863* 1926* 2112« 
2115* = =2118* = =2121* 2477 2518* 2553* 2668* 2890* 2990% 3141 3157" 3210" 3228 


DPTIV 001252 1030 1068* 1472* 1511* 1541* 1550"  1558*  1566*  1604*  1633* 1663*  2007* 2082s 
2106* = 2205* 2231* 2295* 2355% 2474% 2514% 2549% 2624%  2631% 2886*  2973% 2987+ 


DPTP 001254 10314 1071* 2208*  2621* 

DPTS 001240 10224 1066* 1150 1176* 1201* 1205 1252* 1255 1274* 1277 1278 1282 1335 
1336* 1409* 1414 1417 1423* 1428 1429 1433" 1475" 1476% 1477* 1478% 1479s 
1480* 1481* 1482* 1483* 1487 1488% 1489s 1490% 1491% 1492 1493% 1494% 1513 
1514* 91515" = =1516* = =91517*" = =91518*% = =91519% 1520" 1543% 1544" 1548% 15528 1556* 1560 
1564* 1581* 1582 1586 1603*  1607* 1608 1614* 1632* 1637* 1638 1645* 1662* 
1666* 1695* 1767* 1779 1853 1855 1859 1864 1915* 1927" 1957s 
1995* 2013* 2066* 2076* 2085* 2109* 2110 2113 2116 2119 2122 2126 2129* 
2148* 2154* 2202% 2239% 242 2252 2265* 2300* 2304 2314 2327* 2357* * 
236 2377 2425* 2470* 2476* 2480 2483 24 2491 2497 2512* 2517* 
2521 2524 2527 2533 2536 2539 2547" 2552* 2556 2559 2 2567 2570 
2591* 2592* 2593* 2595 2598 2601 2607* 2609 2612 2015 2618* 26°2% 2626+ 
2634* 2637* 2664* 2669 2689* 2591 2696* 2698 2882+ 2891*% 2895*  2896* 
2902* 2948* 2953%  2968% 2983s 992% 2998%  2999« 028* 048* 050* 3057* 3058 


2 3 3 3 
3098 3102* 3103 3107 3114 3118* 3119 3123 3151 3154 3161* 3188* 3190 
3196* 3207 3214" 3222 3268 3276* 


DTO §=—-—«Q17424 3630 36528 
DT1 017436 3634 3¢58¢ 

Ea 017171 36004 2 

E 017212 36034 36 3644 

EMSs 017232 3606" 3640 3648 

ERRCNT 001076 9364 27178 3488s ‘ 

ERRFLG 001200 977# 3369* 3386x 3439 3452 3470 
ERRMSG 016362 3449% 34724 

ERTABO 0165 3467 34994 

EXITER 016432 3483 34884 

FREQ 013522 2949 2954 2961# 3055 
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FRINT 014536 1069 1473) 15121774 )~=— 1847 2150 2206S 2294 = 24752515 2550-2972 31368 

FTINT 014532 1068 «= 1472, «1511-1566 = 2205 474 2514 2549) 2592 31338 

HALTS 016412 3435 3480" 

HERE = 000000 32814 3283s 

ICOUNT 0010€6 9324 3367 «2.3371 

INIFLG 001176 9754 

LESS.T 014362 30784 

LIGHTS= 177570 «ss «590H 3395s , LE eck Sere et er, Pe | | 

LIMIT 001160 9644 2000" 2005*  2068*  2079% 22268 2229% 2270  2288*  2291* 2332 -2349% = 2352 
2395 2941" = 3033e «= 3038» 3159S 3177, 3181 = 3273S 3317 

LINE.N 012234 1065 317127178 

LINE.X 012200 1048 2174  2729% 2780 

LOCK 001064 9314 1692 3410 

LOGICA= 012470 891 2774H 

LOKFLG 001201 9784 

LPCNT 001070 9334 3365* 3367 3370 

LSTERR 001100 937# 3385" 3436 «= 3438 

MCRLF 166 3469 3512 3599" = 3628 

MDATA 017516 3535 3546 «= 36684 

MEPASS 017111 3389 3589" 

MERRPC 017157 3465 35974 

MLINE 017150 3461 35954 

MORE.T 014370 30814 

R 017074 3018 35864 

MTITLE 017022 1041 3579" 

MTSTIN 017134 3457 

NEXT 001062 930# 1064" 1091 1128 1175% 1199% 1224* 1250* 12738 1303" 1333* 13718 14068 
1470* 1509* 1540* 1579% 1601* 16308 1659 1691" 17228 1725 17658 1836" 1839 
1840 1913" 1990"  2030% 2063" 2099% 21472 21938 22248 22858 2347" 2408* 24248 
2468* 2510 2589% 2660* 3372 3495 

PART1 001336 1046 10498 3356 3400 

PART2 00 1051 2172, 217S# = 2179 

PARTS. 012022 2177 2198 = 6 46H 

PASCNT 00 9354 3387* 3395 

POPRO = 012600 599" 3487 

POP.SP= 022626 601# 1549 1557 1565 1615 1646 1674 1812 1878 1934 1959 2131 2779 
3075 3110S 3349S 3350 

POP1SP= 005726 5974 

PS = 177776 S91# = -1040* 1065" 1407* 1471* 1510* 1521% 1522 15428 1551* 1559* 1605* 1634s 
1661" 1769% 1813*  1879% 1958* 2009 2081* 21328 21528 2165" 2469% 2511* 25468 
2590*  2625* 2633" 2945 2967% 3042" 3076s 3198% 3321" 33518 

PUSHRO= 010046 5984 3484 

SH.S= 024646 600# 1547 1555 1563 1613 1643 1672 1792 1871 1932 2125 

PUSHIS= 005746 5 

PWRUP 014006 1 30144 

RCD =: 011714 26224 

RCD1 = 011754 26314 = 3111 

RDATA 001154 9624 1993" 2069 3025" 3169 3171 3176* 3177 «= 3179" = 3239" = 3241 32433245 
3285 3287 3297* 3301" 3310« 3317 

REE 013524 225 = 2286 48 2967" 

REG 013110 1093" 1130" 1305* 1335* 13738 1417* 2807 2809 2810 2813* 2815 2816 28198 
2821 2822 2825" 2827 B28 BKK © 2846 = 2847 2850 2859" 28658662869 

RESREG 016410 478 34814 

RESTRT 016046 3396" 

RESOS = 104411 10064 3481 
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1726 1839* 2177" 2178 2179* 2198* 2199 3019 3372* 3373 
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2340 23484 2401 24094 2417 24254 2461 24694 25114 
26614 33784 
$y = C00014 9798 
= 017560 
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NW 
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WAS WW 
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ERRORS DETECTED: 0 


CZDPAC .BIN, CZDPAC.. SEQ/CRF /SOL/NL : TOC=CZDPAC .MCL,CZDPAC.P11 
RUN-TIME: 6 10 1 SECONDS 

RUN-TIME RATIO: 60/18=3.2 

CORE USED: 13K (25 PAGES) 





